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CHAPTER 1 
BUILDING A GAMMA-11 SYSTEM DISK 



1 . 1 INTRODUCTION 

This chapter describes the procedures that are required in order to 
build a GAMMA-11 system disk. GAMMA-11 is distributed on the 
following media. 

• RK05 disks 

• RK06 disks 

• RL01 disks 

• Magnetic tape 

The disks are complete, runnable system disks that contain all the 
GAMMA-11 software and an executable subset of the RT-11 V3B software. 
A special version of BASIC with GAMMA-11 support subroutines and 
binary files providing FORTRAN callable GAMMA-11 support subroutines 
are on the disks. The magnetic tape is a bootable tape that can 
generate an RK05, RK06, RKQ7, or RL01 system disk. 

NOTE 

Although the GAMMA-11 distribution disk 
is a runnable system disk, it should not 
be used as such. You should copy the 
distribution disk, back it up, and then 
store it in a safe place. In your daily 
activities, you should use only the 
copies that you make of the sysgened 
disk. 

The general procedure for building a GAMMA-11 system disk is as 
follows: 

1. Copy the GAMMA-11 distribution disk or magnetic tape to a 
scratch disk. (See Section 1.2.) 

2. Run the SYSGEN program, which creates a configuration 
procedure that will tailor the system to your needs. (See 
Section 1.3.) 

3. (Optional) Add RT-11 FORTRAN to your system disk. 

4. Backup your new system disk on another disk or magnetic tape. 
(See Section 1.4.) 
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The following sections give step by step instructions for performing 
the above procedures. 

The generic terms 'disk', 'disk pack', 'disk drive', etc. refer to 
either the RK05, RK06, RK07 or RL01 disks. The general build 
procedures are the same for all of these disks, except where 
specifically noted. 



1.2 COPYING THE GAMMA-11 DISTRIBUTION MEDIA 

GAMMA-11 is distributed on RK05, RK06, and RL01 disks and 9-track 
magnetic tape. This section gives the instructions for copying the 
distribution disks or magnetic tape to a scratch disk. You will use 
this copy of the GAMMA-11 distribution when building your system. 

The build procedures for the different disk types are the same, the 
only difference being the 2-character device mnemonic used to identify 
the various disks. In the sections below, you must replace any 
occurrence of 'xx' with the 2-character device mnemonic that 
identifies your type of system disk. The mnemonics are: 

RK for the RK05 disk 

DM for the RK06 or RK07 disk 

DL for the RL01 disk 



1.2.1 Copying a GAMMA-11 Distribution Disk 

Step 1: Mount the GAMMA-11 distribution disk in unit of the disk 
drive. Write lock the disk by pressing the 'WTPROT' or 
'WRITE PROT' switch. The corresponding light should come 
on, indicating that the disk is indeed write protected. 
Mount a formatted scratch disk in drive 1; this disk must 
not be write protected. 

Step 2: Bootstrap the distribution disk. See Chapter 3 of the 

GAMMA-11 Operator's Guide for bootstrap instructions. When 

the disk has been bootstrapped, the following will be 
printed. 

RT-11FB V03B-nn 

.TYPE WARN. TXT 



WARNING 

You have just booted your MASTER copy of GAMMA-11 
F/B V02C. Please copy this disk according to the 
instructions in Section 1.2.1 of the GAMMA-11 System 
Reference manual. 

Step 3: To copy the master disk (in drive 0) to the scratch disk (in 
drive 1) , type: 

@MSTCOP 

The initialization and copy procedure will take from 1 to 5 
minutes depending on the disk type. During this time, the 
system will print a few lines of commands on the DECwriter. 
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When the copying has been completed, the system will print 
the following message. 

COPY COMPLETE 

Step 4: The disk in drive 1 is now a copy of the disk in drive 0. 
Remove the distribution disk from drive and store it in a 
safe place. Remove the new system disk from drive 1 and 
mount it on drive 0. Proceed to Section 1.3 to configure 
your new system disk. 



1.2.2 Copying the GAMMA-11 Distribution Magnetic Tape 

Step 1: Mount the GAMMA-11 distribution magnetic tape on the 
magnetic tape unit. Mount a formatted scratch disk in drive 
0. This disk must not be write protected. 

Step 2: Bootstrap the magnetic tape. If your processor has a 
hardware bootstrap, such as a PDP-11/34, boot the processor 
and type: 

MT 

Otherwise, refer to Appendix C of the RT-11 System 
Generation manual for instructions on how to bootstrap a 
TM11 magnetic tape unit. 

When the tape has been successfully booted the system prints 
the following message. 

MSBOOT VOl-nn 
* 

Step 3: Start the TM11 magnetic tape build program by typing the 
following line at the asterisk. 

MDUP.MT 

The program will respond with an '*'. 

Step 4: Initialize and scan the scratch disk for bad blocks by 
typing: 

xxO:/Z/B 

where xx is RK, DM, or DL. 

The scan will take a few minutes. When the scan is complete 
the system will print '**. 

Step 5: Copy a minimal RT-11 system to the disk by typing: 

xxO:A=MT: 

where xx is RK , DM, or DL. 

Then the disk will be booted. When it is booted, the system 
will print the following message. 

RT-11SJ V03B-nn 
?KMON-F-Command file not found 
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Step 6: Copy the GAMMA-11 magnetic tape copy file from the magnetic 
tape to the disk by typing: 

COPY MT:MTTOxx MTCOPY 

where xx is RK , DM or DL. 

The system response is: 

Files copied 
MT: MTT0xx.COM to xx : MTCOPY. COM 

Step 7: Proceed with the magnetic tape copying procedure by typing: 

@MTC0PY 

The copy procedure will take a few minutes. The system will 
print a few lines of commands during the copying. When the 
copy is completed the system will reboot itself. 

Proceed with step 2 of the next section. 



1.3 CONFIGURING A GAMMA-11 SYSTEM DISK 

After you have copied your GAMMA-11 distribution medium, you must 
configure it for your specific GAMMA-11 system. You do this using a 
program called SYSGEN, which asks you a series of questions concerning 
your system and then generates an RT-11 indirect command file and 
BATCH file that do the actual configuring of your system disk. 

Step 1: Mount a disk copy of the GAMMA-11 distribution medium in 
drive and boot it. The following message will be printed: 

RT-11FB V0 3B-nn 

.TYPE GAMCOP.TXT 

This is a copy of the GAMMA-11 F/B V02C distribution 
media. You should follow the configuration 
instructions in Section 1.3 of the GAMMA-11 System 
Reference manual. 

Step 2: To configure your disk type: 

R SYSGEN 

An explanation of the system configuration will be printed. 
You will be asked a series of questions concerning your 
system. Each question is preceded by a short explanation 
that will aid you in answering the question. The example 
below was used to generate a standard RK05 system. 
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BUILDING A GAMMA-11 SYSTEM DISK 
♦ R SYSGEN 

GAMMA-11 V02C SYSTEM CONFIGURATION 



This procedure will configure your GAMMA-11 v"2C 
disk to your hardware configuration* You will 
be asked a series of Questions* All Questions 
except the first two are to be answered with 



Y for yes 
N for no 



followed by a carriage return. If you type 
Just a carriage return r 'yes' will be used* 



After answering all the questions)' you will be 
given further instructions* If you make a 
mistake and wish to restart* type a CTRL/C* and 



R SYSGEN 



GAMMA-11 can use any of the following disks as 
isystem devices* (RK'05 is the default.) 



RK05 RK06 RK07 RL01 



WHAT IS YOUR SYSTEM DISK? RK05 



The GAMMA-11 disk must be loaded in an RK05 drive* and 
the disk unit must be up to speed and not write protected 
before you answer the next Question* 



IN WHICH DISK UNIT DID YOU LOAD THE GAMMA-11 DISK? 



You have a choice between a foreground/background 
operating system* or a single Job operating system. 
The foreground/background operating system will 
allow you to simultaneously acouire and analyze data. 
Most users will use this feature* the only users 
who can not use it are those with no foreground 
terminal* or less than 28K words of memory. 



DO YOU WANT A FORGROUND/BACKGROUND SYSTEM? Y 
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If your PDP-11 has the Extended Instruction Set (EIS) 

you can use the EIS version of BASIC* EIS is 
standard on a PDF'- 11/34* 

IS YOUR SYSTEM A PDP-11/34 OR DOES IT HAVE EIS? Y 



The RT-11 Monitors will have to be patched if 
your line freauenca is 50 Hz instead of 60 Hz* 



IS YOUR LINE FREQUENCY 60 HZ? Y 



The standard display for a GAMMA -11 system is the 
VSV01 color display* Some users may have the older 
VT01 storage scope display* 



DOES YOUR SYSTEM HAVE A VSV01 COLOR DISPLAY? Y 

The Gate Synchronized Acquisition <GSA) programs reauire 
an external gating signal* If your system has the 
new NCV11-A gamma camera interface* the gate is 
always interfaced through it. If you have the NC11-A 
interface* the gate is interfaced via the AR-11* 

DOES YOUR SYSTEM HAVE THE NEW NCV11 GAMMA CAMERA INTERFACE? N 



If your gate signal is a TTL low-to-high signal* 
it xs interfaced thru AR-11 ADC channel. 3* 
If your gate signal is a TTL high-to-low signal* 
it is interfaced thru the AR-11 'EXT A/D ST'* 



WILL YOU INPUT THE GATE SIGNAL THRU AR-11 ADC CHANNEL 3? Y 



The data acousition programs can store the date 
in either the U*S* date format* month/day /year * or 
the European date format* day-month-wear ♦ 



DO YOU WISH TO USE THE U.S. DATE FORMAT* MONTH- DAY- YEAR? Y 



The magtape backup procedure can create bootable 
or non-bootable magtapes* Bootable magtapes reauire 
extra RT-11 programs* Only those users with a 
magtape drive and only one disk drive need the 
bootable magtape backup procedure* All others 
should delete this option* 



DO YOU WISH TO DELETE THE BOOTABLE MAGTAPE OPTION? Y 
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The following system will be configured 



A F/B RK05 system with 
VSV01 color display 
EIS support 
60 Hz line freauenca 
U* S* date format <month/day/year) 
GSA input AR-11 ADC Channel 3 



IS THIS CORRECT? Y 



The actual configuration will take a few minutes* 

When it is finished* the newly configured disk 

will be booted* This disk should be backed-up 

on another disk or magtape* Read section 1*3 

of the GAMMA-11 SYSTEM REFERENCE MANUAL. AA-2186B-TC. 



You are now ready to run the actual configuration 

files* The disk loaded in RK05 drive will 

be the disk that will be configured* 

When the RT-11 MONITOR prints a dot (*)r type 



0RKOJGAMCNF (followed by a return) 
When BATCH prints an asteric (#)r type 
GAMBAT (followed by a return) 

.©RKOJGAMCNF 

.LOAD BA 

♦ASSIGN RKO LST 

♦ASSIGN RKO LOG 

♦ASSIGN RKO DK 

♦R BATCH 
*GAMBAT 
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Step 3; Invoke the configuration procedure by typing: 

@xxO:GAMCNF 
where xx is RK, DM, or DL. 
When the following is printed: 

.R BATCH 

* 

type: 

GAMBAT 

The configuration will take a few minutes. The system will 
reboot itself when the configuration is complete, and prints 
the following: 

RT-11FB V03B-nn (or RT-11SJ V03B-nn) 

.RENAME/NOLQG START%.TMP *.COM 

System configuration is now complete. 

Users who have purchased FORTRAN Version 2 should install FORTRAN on 
their new system disk according to the instructions in the RT-11/F4 
Installation Guide, and then proceed with the back up procedure. 



1.4 BACKING UP A GAMMA-11 SYSTEM DISK 

You should prepare a back-up copy of your new system disk on another 
disk or magnetic tape. If anything should happen to your system disk, 
the back-up copy can be used to quickly create a new system disk. 

The configuration procedure leaves two RT-11 indirect command files on 
your disk which you can use to quickly and easily back up your disks. 
BACKUP is used for disk-to-disk copying, and MTBACK is used for 
disk-to-magnetic tape copy. The following sections describe the 
simple procedures required to back up your GAMMA-11 system disk. 



1.4.1 Disk-to-Disk Copy 

To back up your system on another disk, do the following: 

Step 1: If your system disk is not running in drive 0, mount it in 
drive and boot it. Write protect the system disk. 

Step 2: Mount a scratch disk in drive 1. Do not write protect the 
scratch disk'. 

Step 3: Assign the scratch disk to device 'COP' by typing 

ASSIGN xxl COP 

where xx is RK , DM, or DL. 
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Step 4: Initiate the copy by typing 

@BACKUP 

BACKUP will initialize the disk in drive 1 and scan it for bad blocks. 
Then all files will be copied from the system disk, and finally the 
bootstrap program will be copied. When this is finished (5-10 
minutes) , the disk in drive 1 will be an exact copy of the disk in 
drive 0. Simply repeat this section whenever a new copy of your 
system disk is needed. 



1.4.2 Disk-to-Magnetic-Tape 

To copy your system disk to magnetic tape, do the following: 

Step 1; If it is not running, mount your system disk in drive and 
boot it, write protected. 

Step 2: Mount a scratch magnetic tape and place it on-line. 

Step 3: Initiate the copy by typing: 

MTBACK 

MTBACK will initialize the magnetic tape and copy all files 
to it. If you did not request that the bootable magnetic 
tape option be deleted during system configuration, the 
magnetic tape will be a bootable magnetic tape. 



1.4.3 Magnetic-Tape-to-Disk Copy 

There are two methods by which a system disk can be generated from a 
magnetic tape back-up. Method 1 is the simplest; it requires a dual 
disk system and a running GAMMA-11 system disk. Method 2 is more 
complicated and is necessary only if your system has only one disk 
drive, or if no GAMMA-11 system disk is available. 

METHOD 1 (non-bootable magnetic tape) 

Step 1: Mount any GAMMA-11 system disk in drive and boot it. 

Step 2: Mount the magnetic tape and place it on-line. 

Step 3: Mount a formatted scratch disk in drive 1. 

Step 4: Assign the magnetic tape to device 'DK' and the scratch disk 
to device 'COP' by typing: 

ASSIGN MT DK 
ASSIGN xxl COP 

where xx is RK, DM, or DL. 

Step 5: Initiate the copying by typing: 

@BACKUP 

BACKUP will initialize the disk in drive 1 and scan it for bad blocks. 

Then all files will be copied from the magnetic tape, and finally the 

bootstrap program will be copied. The entire process will take 5-10 
minutes. 
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METHOD 2 (bootable magnetic tape) 

Step 1: Mount the magnetic tape on the tape drive and mount a 
scratch disk in drive 0. 

Step 2: Follow steps 2, 3, 4, 5, 7 of Section 1.2.2, copying a 
GAMMA-11 distribution tape. 

Do not configure the disk, since it is a copy of a configured disk. 



1.5 UNSUPPORTED PROGRAMS ON THE GAMMA-11 V2C MEDIA 

Four unsupported programs are distributed with GAMMA-11 F/B V02C. 
These programs are furnished as a convenience to the user. These 
programs are NOT supported by DIGITAL. 

VTECO and STECO are modified versions of the unsupported RT-11 text 
editor TECO. VTECO uses the VSV01 color display, and STECO uses the 
VTul storage scope display in the same manner as TECO uses the VTll 
graphics processor. 

TTYl and TTYO allow the user to switch control of the RT-11 background 
to and from the foreground VT52 terminal. 

The file CLASSC.TXT on the distribution media contains more 
information concerning these four programs. To print this file, mount 
the distribution medium on a spare drive, write protected and type: 

TYPE dev:CLASSC.TXT 

To copy any of these programs, type: 

COPY dev:name DK: 

where dev: is the device and unit of the distribution medium; e.g., 
DK1:, MT:, etc. The 'name' is the name of the program to be 
transferred . 
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PROGRAMMING SUPPORT INFORMATION 



2.1 GAMMA-11 PATIENT FILES 

A GAMMA-11 file is an RT-11 file produced by the GAMMA-11 programs. 
Consequently a GAMMA-11 file can be treated like any RT-11 file and 
can be read by BASIC, FORTRAN, or assembly language programs. 

A different file structure represents each of the four GAMMA-11 
patient study types. The four types of studies are: dynamic, single 
static, multiple static, and list mode. 

A description of each of the four file types follows. Along with each 
description is a diagram of the file layout. The pointers labeled in 
each diagram are not explained in the general file descriptions. 
Instead they are explained in Section 2.4, and the whole file is laid 
out in Tables 2-1 and 2-2. 
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2.1.1 Dynamic Studies 

A dynamic study consists of up to 512 frames collected at specified 
rates over designated periods of time, comparable to a sequence of 
motion picture frames. The specified rate of acquisition may be 
changed up to 12 times during the acquisition. Thus, a dynamic study 
consists of between one and thirteen groups of frames. Between groups 
only the frame rate, number of frames, and the matrix size may be 
varied . 

Figure 2-1 shows the structure of a dynamic study file. The file 
consists of three to six blocks of general file and specific patient 
information followed by the gamma camera data. 

The initial block (block 0) of a dynamic study file is called the 
administrative data block. This block is filled by the collection 
procedure program and contains all information entered by the user at 
acquisition set up time. It contains the patient name and number, 
organ under study, types of tests, dosage, and other statistical 
information together with pointers to various other blocks that make 
up the data file. 

The z-count area follows the administrative data block and consists of 
one to four disk blocks, depending on the number of groups within the 
dynamic study. The z-count area contains statistics on the number of 
events that occurred during the study (see Section 2.2). 



Following the z-count area is the comment block. The comment 
holds the user's comments about the study (see Section 2.3). 



block 



The rest of the study is composed of the matrix data. 
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Figure 2-1 Dynamic Study Data File 
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2.1.2 Single Static Studies 

A single static study is structured similarly tb a dynamic study. 
However, in a single static study, the z-count area (see Section 2.2) 
is contained within the administrative block and only one frame of 
data follows the comment block (see Figure 2-2). 



FIRST ADMINISTRATIVE 
DATA BLOCK IS 



ADMINISTRATIVE 
DATA 
BLOCK 








CE 
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COMMENT 
BLOCK 


■*•— 






MATRIX 

DATA 
BLOCKS 









Figure 2-2 Single Static Study Data File 
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2.1,3 Multiple Static Studies 

A multiple static study file is a number of single static study files 
linked together. In a multiple static study, 

• each data frame is preceded by an administrative block, but 
only the first administrative block is followed by a comment 
block, 

• each administrative block is linked to the administrative 
blocks that precede it and follow it, 

• each data frame has a link to the comment block. 
See Figure 2-3. 
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FIRST ADMINISTRATIVE 
DATA BLOCK ISO 



ADMINISTRATIVE 

DATA BLOCK 

FRAME #1 
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DATA BLOCKS 
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Figure 2-3 Multiple Static Study Data File 
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2.1.4 List Mode Studies 

A list mode study is structured like a static study except that the 
data following the comment block is raw list data rather than a 
matrix. See Figure 2-4. 
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DATA 
BLOCK 






— 


CO 

tr 

a. 

O 
u 






COMMENT 
BLOCK 


•* — 






LIST 
MODE 
DATA 









Figure 2-4 List Mode Study Data File 



2.2 Z-COUNT AREA 

The z-count area is contained in the administrative block for static 
and list studies and follows the administrative block for dynamic 
studies. The z-count area stores the number of events present on each 
study frame as a 32-bit unsigned integer composed of two 16-bit words. 
The first word is the high order 16 bits, and the second word is the 
low order 16 bits. In a dynamic study, the z-count area is one to 
four blocks of disk space. 



2.3 COMMENT AREA 

The comment block is available for the user's comments. The comment 
block consists of ten lines of ASCII text with up to 51 characters per 
line. The first character of each line is a non-printing character 
which is either an octal or an octal 1. If the first character is 
an octal 1, the rest of the line contains up to 49 characters of valid 
ASCII text which is terminated by an octal 200. The first line with a 
as the first character indicates the end of the comments. 
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2.4 LAYOUT AND DESCRIPTION OF THE ADMINISTRATIVE DATA BLOCK 

The administrative data block contains all the information needed to 
reference the data in the study file. It is divided into two 
sections; the first section contains those variables and pointers 
common to all types of studies, and the second section contains those 
variables and pointers specific to each type of study. 

Table 2-1 shows a complete layout of the administrative data block. 
The decimal and octal positions of each variable are given along with 
the variable type, its name, and its description. 



2.4.1 The Administrative Data Block Common Section 

The first section of the administrative data block, which occupies the 
area from octal address to octal address 332, is common to all the 
study types. This section includes all offset pointers and the 
information pertinent to the patient such as the patient name, number, 
birth date, and doctor. 

The offset pointers are the links from the administrative data block 
to the other data blocks. The offset pointers are: 

ZCTOFF points to the z-count block (dynamic study only) 
COMPRS points to the comment block 
MDOFF points to the data block 

Those pointers that are specific to multiple static studies are: 

PADOFF points to the previous administrative block 
FADOFF points to the first administrative block 
NADOFF points to the next administrative block 



2.4.2 The Administrative Data Block Individual Study Section 

The second section of the administrative data block, which occupies 
octal positions 346 to 776, consists of collection parameters, number 
of frames, number of groups, types of matrices, and general 
administrative information pertaining to the immediate study. 

The second section is an overlay area and is used for one type of 
study at a time. Since static, dynamic, and list studies cannot be 
combined in the same file, only the information applicable to the 
specific study type is used in the overlay area. 

In the following table, Table 2-1, the variable types are abbreviated. 
ASC represents ASCII, INT represents integer, DPI represents double 
precision integer, and SPE represents special. 
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Table 2-1 
Administrative Block 



ecimal 


Octal 


Type 


Name 


1 


1 


ASC 


PATNAM 


24 


30 


ASC 


PATNUM 


40 


50 


ASC 


CAMID 


43 


53 


ASC 


ATI ME 



53 



65 



ASC 



ADATE 



63 


77 


ASC 


BIRTHD 


73 


111 


ASC 


DOC 


96 


140 


ASC 


ORGAN 


110 


156 


ASC 


VIEW 


120 


170 


ASC 


CMTRT 


127 


177 


ASC 


AQMODE 


130 


202 


ASC 


ISOTOP 


144 


220 


ASC 


DOSE 


158 


236 


ASC 


IS02 


172 


254 


ASC 


DOSE2 


186 


272 


ASC 


ISMODE 


189 


275 


SPE 


COLTYP 






BYTE 


< 
= 
> 


192 


300 


INT 


COMPRS 


194 


302 


INT 


TOTBLK 


198 


306 


INT 


FADOFF 


202 


312 


INT 


DATTYP 


205 


315 


ASC 


ORIENT 


208 


320 


ASC 


POSSWT 


212 


3 24 


INT 


MDOFF 


214 


326 


INT 


PADOFF 


214 


326 


INT 


ZCTOFF 


216 


330 


INT 


NADOFF 


219 


333 


ASC 


AMACRO 


227 


343 


ASC 


AUTO 



Description 



Patient name 

Patient number 

Camera number (0-3) (NCV11 only) 

Acquisition time (supplied by 

program) 

Acquisition date (supplied by . 

program) 

Patient birth date 

Doctor's name 

Organ being studied 

View of picture 

Collimator type 

Acquisition 

mode : l=special , 2=normal 

Isotope being used 

Dosage 

2nd isotope being used 

2nd dosage (dual isotope study) 

l=single isotope, 2=dual isotope 

Collection type 

List mode 

Dynamic study 

Static study 

Offset to comment block 

Total number of blocks in study 

Offset to first admin block 

(multiple static) 
Data type:0=patient data,l=flood 
Orientation switch 
Position (rotation) switch 
Offset to matrix data 
Static: offset to previous 
admin block (multiple static) 
Dynamic: offset to z count block 
Offset to next admin block 

(multiple static) 

Auto analysis macro name 

Auto analysis switch (Y or N) 



STATIC AND LIST COLLECTION PARAMETERS 



23Q 


346 


DPI 


ZCOUNT 


234 


352 


DPI 


OVFTIM 


238 


356 


ASC 


ENDFRA 


247 


367 


ASC 


MINUTE 


252 


374 


ASC 


SECOND 


257 


401 


ASC 


PSCNT 



Z count, the number of events 

Time of overflow clock counter 

Method of ending study :l-time, 

2=counts 

The number of minutes in the 

study 

The number of seconds in the 

study 

The number of preset counts 

chosen 



STATIC MODE COLLECTION PARAMETERS 

241 361 ASC SMTXSZ The type of matrix 

(1,2,3,4, or 5) 
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Table 2-1 (Cont.) 
Administrative Block 



Decimal 


Octal 


Type 


Name 


244 


364 


ASC 


SMTXCS 


268 


414 


ASC 


MSFRM 


272 


420 


INT 


CFRM 



Description 



Close on overflow: <SPACE>=do 

not 

close, <T>=close 

The number of frames 

Current frame number 



LIST MODE COLLECTION PARAMETERS 



241 


361 


ASC 


LDBLCK 


268 


414 


ASC 


LDBPC 


271 


417 


ASC 


LDELST 


274 


422 


ASC 


LDELRT 


281 


431 


ASC 


LGSA 



The number of disk blocks of 

data 

Method of closing:l=by counts, 

2=by number of blocks 

Method of starting :Y=delayed 

start, N=immediate start 

Count rate for delayed start 

(maximum of 20,000) 

If-'Y', study is a gated list 

mode 



DYNAMIC MODE COLLECTION PARAMETERS 



230 


346 


INT 


FRAMEN 


232 


350 


INT 


GROUPN 


234 


352 


ASC 


GRPl 


238 


356 


ASC 




240 


360 


ASC 




242 


362 


ASC 




246 


366 


ASC 




251 


373 


ASC 


GRP2 


268 


414 


ASC 


GRP3 



Total number of frames 

Total number of groups 

The number of frames in group 1 

The type of matrix(l,2,3 or 4) 

The type of close 

Frame rate: X frames 

Per Y seconds (milliseconds for 

gated studies) 

Group 2 (same 5 parameters as 

group 1) 

Group 3 



438 



666 



ASC 



GRPl 3 



Group 13 



GATE SYNCHRONIZED ACQUISITION (GSA) COLLECTION PARAMETERS 
(Group #1 is set up as a dynamic study) 

GSA matrix type (1 or 2) 
Number of frames 
Frame duration in msec 
Tolerance in msec 
End Frame (1, 2, or 3) 

1 = Time 

2 = Counts 

3 = Cycles 
Preset Counts 
Preset Cycles 
Preset Minutes 



251 


373 


ASC 


GSAMTX 


254 


376 


ASC 


GSAFRM 


259 


403 


ASC 


GSADUR 


265 


411 


ASC 


GSATOL 


271 


417 


ASC 


GSAEFM 



274 


422 


ASC 


GSAPSC 


285 


435 


ASC 


GSACYC 


291 


443 


ASC 


GSAMIN 
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Table 2-1 (Cont. ) 
Administrative Block 



Decimal Octal Type Name Description 



Preset Seconds 

Collection time in seconds 

# cycles collected (accepted 
plus rejected) 

Total Counts Collected 

Frame duration in msec 
Tolerance in msec 

# rejected cycles 



296 


450 


ASC 


GSASEC 


302 


456 


INT 


BINSEC 


304 


460 


INT 


BINCYC 


306 


462 


DPI 


BINZLO 
BINZHI 


310 


466 


INT 


BINDUR 


312 


470 


INT 


BINTOL 


314 


472 


INT 


BINBAD 



2.5 PATIENT FILENAMES 

GAMMA-11 identifies patient studies via an indexed line which contains 
up to 62 characters. For example, 

1 JOHN DOE, 370180, LIVER, D, 6/3/74 

is the way John Doe's file would appear on the GAMMA-11 patient study 
index. Internally, however, the patient files are referenced using 
RT-11 filenames. The RT-11 patient filenames have the form; 

aaaaaa.Xnn where aaaaaa are the first six characters of the 
name field of the patient's study. The nn is a 
number between 00 and 99. This formula creates a 
unique filename even when the name portion 
(aaaaaa) of the file is duplicated. The system 
assigns the number at the time of file creation. 
The numbers are assigned in the order of 
acquisition for each patient with the same name. 
For example, JOHNDO.X00 and JOHNDO.X01 are two 
filenames for two John Doe's (or two studies on 
the same John Doe) . 

These filenames are created automatically by GAMMA-11 at data 
acquisition setup time. 

To reference GAMMA-11 data files when using BASIC or FORTRAN, you must 
know the RT-11 filename for that data file. To obtain the RT-11 
filenames for all patients, type 



when the patient index is displayed during the data analysis program. 
The RT-11 filenames will be displayed at the end of each index line 
instead of the date. For example, 

1 JOHN DOE, 370180, LIVER, D, JOHNDO.X00 

is displayed for the first John Doe. 
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2.6 SAVE AREAS 

Save areas are disk files that are reserved for the user to store 
single matrices or dynamic curves. Save areas through 9 permanently 
exist on the disk. 

Save area is used by the data analysis program for temporary storage 
of new study data in core. Because save area contains the last 
displayed matrix image other than a save area matrix, the user can 
perform save area manipulations, such as reading other save areas into 
core and performing save area algebra, and then return to the original 
study in core by reading save area 0. Fifty-five optional save areas 
(10 through 64) can be specified by the user. However,, these areas 
are restricted to matrices and have no provision for dynamic curves. 
When the; user writes a matrix into a previously nonexistent optional 
save area, GAMMA-11 automatically produces the optional save area on 
the disk. 

Save areas 1 through 9 each take up 53 blocks of the system disk. 
Each optional save area will reside on the system disk and take up 33 
disk blocks each. 

Save areas are RT-11 files. Their filenames are: 

SVAR00.SYS for save area 

SVAR01.SYS for save area 1 

SVAR02.SYS for save area 2 
etc. 



2.6.1 Save Area Descriptor Block 

The first block ; (block 0) of the save area disk file is called the 
save area descriptor block. The save area descriptor block describes 
the type of save area (matrix or curve data) as well as the study with 
which the save area is currently associated. It contains the matrix 
type, number of frames, frame rate, pointers into the study, etc. 
Table 2-2 shows the layout of the save area descriptor block. 

In Table 2-2, the variable types are abbreviated. ASC represents 
ASCII, TNT represents integer, DPI represents double precision 
integer, and FP represents floating point. 

Table 2-2 
Save Area Descriptor Block 

Decimal Octal, Type Name Description 

RAD50 device name of indexed 
device 

RAD50 file name and extension of 
file 
NPFILE Number of patient files found on 
indexed device 









INT 


NDXDEV 


2 


.' 2 


INT 


FILNAM 


8 


10 


INT 


NPFILE 
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Table 2-2 (Corit.) 
Save Area Descriptor Block 



Decimal 


Octal 


Type 


Name 


10 


12 


INT 


XTRBYT 


12 


14 


INT 


STYPE 



14 



138 



140 

142 
143 
144 

146 



148 
150 

150 

152 

152 

154 

156 
158 

160 



16 



212 



214 

216 
217 
220 

222 



224 
226 

226 

230 

230 

232 

234 
236 

240 



INT 



INT 



INT 



SDTYP 



16 


20 


ASC 


SINDX 


82 


122 


ASC 


SGMDH 


128 


200 


INT 


SXPND 


130 


202 


INT 


SLADFG 


132 


204 


INT 


SROTAT 


134 


206 


INT 


SNESW 


136 


210 


INT 


SSD 



SDUAL 



INT 


SORIG 


BYTE 


SPOSOR 


BYTE 




INT 


SAQM 


INT 


SFLDN 


INT 


SPDTA 


INT 


SPPAD 


INT 


SPZCT 


INT 


SPNAD 


INT 


SPTOV 


INT 


SPADM 


INT 


SPCOM 


INT 


SDAD 



SDMOD 



162 


242 


BYTE 


STHSH 


163 


243 


BYTE 




164 


244 


BYTE 


STHSL 



Description 



Number of extra bytes in dir- 

ectory entry 

Data type indicator (in low 

byte) 

= no data in save area 

1 =■ matr ix data 

200 = dynamic curves 

Save register number in low byte 

negative number^f rame divide is 

set 

Index line (66 ASCII characters) 

GAMMA-11 command string (46 

ASCII characters) 

Expand switch: - no expansion, 

non-zero = expanded matrix 

Sliding add switch (the number 

of frames to add) 

Rotation factor: - regular, 1, 

2, or 3 to rotate axes 

No enchancement switch 

Static or dynamic :Q=static, 

non-zero^dynamic 

Dual isotope switch : 0-no dual 

isotope 

1 = isotope A, 

2 = isotope B 
Original study type 
(non-zero-list mode) 
Position (rotation) switch 
Orientation switch 
Acquisition mode: 

1 = special, 2 * normal 

Flood correction switch: 

- not done, 1 - flood cor, 

done 

Offset to data matrices 

Offset to previous admin block 

(multiple static only) 

Offset to z-count block (dynamic 

only) 

Offset to next admin block 

(multiple static only) 

Offset to time of overflow block 

(dynamic only) 

Offset to administrative data 

block 

Offset to comment block 

Relative block number of present 

frame 

Isometric switch: 

= intensity, 

1 = isometrics 
High threshold in % 
Step size in % 

Low threshold in % 
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Table 2-2 (Cont.) 
Save Area Descriptor Block 



Decimal 


Octal 


Type 


Name 


165 


245 


BYTE 




166 


246 


INT 


SSIZE 


168 


250 


INT 


SWDBYT 


170 


252 


INT 


SDIM 


172 


254 


INT 


SMAX 


174 


256 


INT 


SMIN 


176 


260 


DPI 


SCOUNT 


180 


264 


INT 


SMEAN 



Description 



Step size in % 

Number of words in current 

matrix 

Word or byte switch: = word, 

1 = byte 

Dimension size (32, 64, or 128) 

Maximum cell count 

Minimum cell count 

Total number of counts 

The average cell count 



STATIC MODE PARAMETERS 



206 


316 


INT 


SMSCFR 


208 


320 


DPI 


SSTM 


212 


324 


DPI 


SSVTM 


216 


330 


DPI 


SSZCT 


220 


334 


INT 


SSMSZ 


222 


336 


INT 


SSFAD 



224 



340 



ASC 



SVIEW 



Current frame number of multiple 

static study 

Duration of collection in 

seconds 

Time of overflow in seconds 

Z count, the number of events 

Number of words in matrix 

Offset to first administrative 

data block 

View of frame (10 ASCII 

characters) 



DYNAMIC MODE PARAMETERS 



206 


316 


INT 


SCRFRM 


208 


320 


INT 


SCURGP 


210 


322 


INT 


SCURGF 


212 


324 


INT 


SCURFM 


214 


326 


INT 


SN 


234 


352 


INT 


SG 


236 


354 


INT 


SGROUP 
(1) :SGPF 


238 


356 


INT 


SGPSZ 


240 


360 


INT 


SGPCS 


242 


362 


INT 


SGXTM 
(SGX) 


244 


364 


INT 


SGY 


246 


366 


INT 


SGROUP 
(2) 



Cummulative frame number 
Current group number 
Current number of frames in 
group 

Current frame within group 
Total number of frames 
Total number of groups 
Number of frames in group 

Number of words of frames in the 

group 

The close on overflow flag 

Exposure rate: X frames per 

Y seconds (milliseconds for 
gated studies) 
Group 2 



356 



366 



544 



556 



INT 



SGROUP 
(13) 



Group 13 



ROI AND DYNAMIC CURVE PARAMETERS 
INT NMROIS 



The number of regions of 
interest (max of 12) 
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370 


562 


BYTE 


X2 


371 


563 


BYTE 


Y2 


372 


564 


BYTE 


ROIXY 
(2) XI 



424 


650 


426 


652 


428 


654 
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Table 2-2 (Cpnt.) 
Save Area Descriptor Block 

Decimal Octal Type Name Description 

368 560 BYTE ROIXY Region of interest definition 

(1) XI table 
If XI and Yl are negative, the 
region is undefined 
XI = x-position of 
left ordinate 

369 561 BYTE Yl Yl = y-position of lower 

abscissa 

X2 = right ordinate 
Y2 = upper abscissa 
ROI table number 2 



412 634 BYTE ROIXY XI ROI table 13 

(12) 
422 646 INT IRM Irregular ROI switch: 

= regular region, 
non-zero = irregular 
INT SCELLS The number of cells in the 

matrix 
INT NMCELLS Number of cells in 

(1) region of interest 1 
INT NMCELLS Number of cells in 

(2) ROI 2 



NMCELLS Cells in ROI number 12 

(12) 

MAXCCR Maximum cell count rate for the 

matrix 

MAXCCR Maximum cell count rate for 

(1) region of interest 1 

MAXCCR Maximum cell count rate for ROI 

(2) 2 



500 764 FP MAXCCR Maximum for ROI 12 

(13) 

MATRIX SAVE AREA PARAMETERS 

Cell counts for matrix 

Cell counts for each ROI (used 

with matrix data) 

Cell counts for ROI 2 



500 764 DPI ROICNT Cell counts for ROI 12 

(12) 



2-14 



448 


700 


INT 


452 


704 


FP 


456 


710 


FP 


460 


714 


FP 



452 


704 


DPI 


ROICNT 


456 


710 


DPI 


ROICNT 
(1) 


460 


714 


DPI 


ROICNT 
(2) 
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2.6.2 Saving Matrix Data 

Matrix data starts at block one of the save area disk file. If a 
specific save area contains matrix data, the data may use from 2 to 32 
disk blocks, depending upon the size of the matrix. 

Irregular region of interest (ROI) data is stored in the save area 
along with the matrix. Irregular ROIs are not applicable for 128x128 
matrices. If the matrix size is 128x128, the matrix fills blocks 1 
through 32. For 32x32 and 64x64 matrices, the matrix fills up to 16 
blocks, and the irregular ROI information fills blocks 17 through 32. 
The irregular ROI information always starts at block 17, even if the 
matrix does not fill 16 blocks. Figure 2-5 shows the layout of a 
matrix save area. 

The ROI information is stored an ROI map. The map contains one word 
per cell of the matrix; that is, each cell in the matrix is 
represented by one word in the ROI map. Figure 2-6 shows the layout 
of the ROI map compared to the cell map that shows on the display. 

Each word in the ROI map defines, the ROI information for the 
corresponding cell in the display matrix. Each word in the ROI map 
contains one bit per ROI. Bits through 11 represent ROIs A through 
L. If the corresponding cell is in ROI A, then bit is set. If the 
cell is also within ROI B, then bit 1 is set, and so forth. Bits 12 
through 15 are used internally and should not be written by a program. 
Figure 2-7 shows a word in The ROI map. 

The ROI map is always a 64x64 matrix. Thus for a 32x32 matrix, four 
cells of the map are marked for each cell of the 32x32 matrix. Note 
on Figure 2-6, cells (1,1), (1,2), (2,1), and (2,2) would all be 
marked for the first cell of the 32x32 matrix. 



NOTE: In FORTRAN 
the descriptor block is 
block 1 and the ROI 
map starts at block 1 8. 



32 



SAVE AREA 
DESCRIPTOR BLOCK 



MATRIX 



IRREGULAR 

REGION OF INTEREST 

MAP 



Figure 2-5 Matrix Save Area 
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CELL 



(1,1) 



(1,2) 



(1,3) 



(64,63) 



(64,64) 



ROI MAP 









(64,63) 


(64,64) 








<2,1) 


(2,2) 




(1,1) 


(1,2) 









CELL MAP ON DISPLAY 



used 
internally 



Figure 2-6 ROI Map and Cell Map 



LKJ I HGFEDCBA ROI 



11 10 98 7654 3 2 10 



Figure 2-7 Word in ROI Map 



bit 
number 
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2.6.3 Saving Dynamic Curves 

Each dynamic curve uses four disk blocks and consists of up to 512 
floating point numbers. A save area may hold up to thirteen dynamic 
curves, twelve representing the twelve possible regions of interest 
and the thirteenth representing the total count curve. 

Blocks one through four of the dynamic curve data contain the total 
count curve which represents the total number of elements present 
within each frame of the study. Each following 4-block set contains 
the dynamic curve data for each region of interest. Therefore a save 
area containing twelve regions of interest uses all of the available 
52 disk blocks. See Figure 2-8. 



block o 



49 



52 



SAVE AREA 
DESCRIPTOR 



THIS AREA CONTAINS 

THE TOTAL NUMBER OF 

COUNTS WITH IN EACH 

FRAME OF THE STUDY 



REGION OF 

INTEREST 

'A' 



REGION OF 



INTEREST 
'K' 



REGION OF 

INTEREST 

'L' 



Figure 2-8 Dynamic Curve Save Area 



2.7 INTERNAL GAMMA-11 FILES 

GAMMA-11 requires a number of internal files for use as work areas and 
save areas. The naming conventions for these files are as follows: 

SVARnn.SYS is the name of a save area where nn is the number of 

the save area (00 through 64) . 
GAMMAx.SYS names a work area where x is the identification 

character of the work area. This is the general form 

of the following internal files. 

GAMMAD.SYS used to store dynamic curves. 

GAMMAS. SYS a scratch file used to store intermediate values. 

GAMMAI.SYS a scratch file used by indexed display routine. 

GAMMAP.SYS the predefined study file. 
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GAMMAM.SYS temporary storage for the irregular regions mark matrix 
(IR definition map) . (Do not confuse this with the 
save area ROI map.) 

GAMMAL.SYS temporary storage for list mode parameters. 

GAMMAC.SYS storage for the color tables. 

GAMMAB.SYS dual display buffer 



2.8 GAMMA-11 MACRO AND PLAYBACK FILES 

GAMMA-11 macro filenames are all of the form 

filename.GMC 

where filename is the name given to the macro at its creation with the 
MC or MS command. 

GAMMA-11 playback filenames are all of the form 

filename. GPB 

where filename is the name given to the playback file at its 
initialization with the PBI or PBM command. 



2.8.1 Playback Files 

A GAMMA-11 playback file (.GPB extension) consists of a one-block 
header block followed by the playback image buffers. 

The first word of the playback header block contains the number of 
images stored in the playback file. To change the number of frames 
(in BASIC), declare the file an integer virtual array and change 
element (zero) . 

The index line and comment line are stored as ASCII strings with 
maximum length of 128 characters. To change either the index line or 
comment line, declare the file a character virtual array of string 
length 128 and change element 1 (the index line) or element 2 (the 
comment line). You must make sure that the new string is less than 
128 characters (0 to 127) . 

For example, the following BASIC program changes both the index line 
and the comment line. Note that this example deletes the comment 
line. 

10 DIM #1, A$(3) = 128 

20 OPEN 'filename. GPB 1 AS FILE #1 

30 A$(l) = 'NEW INDEX LINE' 

40 A$(2) = * ' 

50 CLOSE #1 

60 END 

Do not change any other elements in the file. 



2-18 



CHAPTER 3 
BASIC AND FORTRAN SUPPORT 

3.1 BASIC AND FORTRAN SUPPORT FOR GAMMA-11 F/B 

The BASIC and FORTRAN support subroutines for GAMMA-11 allow complete 
access to the patient files and save areas (whether they hold matrix 
data or dynamic curves) . The BASIC routines are linked with the BASIC 
interpreter and include a resident 1.5K buffer for data. The FORTRAN 
routines use the same resident 1.5K buffer for the data and perform 
the I/O similarly to BASIC. However, you have to link the object 
files of the FORTRAN routines with your compiled FORTRAN program to 
produce a running program. 

Because the GAMMA-11 data, the BASIC interpreter or FORTRAN compiler, 
and a user-written program together need more memory than is 
available, the BASIC and FORTRAN support routines contain an automatic 
disk swapping routine. This swapping routine is transparent to the 
user, who can write programs as if there were more than enough memory. 

There are two kinds of FORTRAN support routines discussed in this 
chapter. The first set of routines are called the FORTRAN support 
routines. These routines are similar to the BASIC routines. 

The second set of FORTRAN routines are called the supplemental FORTRAN 
support routines. The supplemental routines do not perform input and 
output operations on patient files and save areas. The supplemental 
routines are not compatible with the FORTRAN support routines, and the 
two sets of FORTRAN routines can not be used together. 



3.1.1 Support Routine Notation 

The following table lists the notation for the parameters of the BASIC 
and FORTRAN support subroutines. 

NOTE 

Since BASIC numeric variables have no 
type (e.g., integer or real number), the 
last column of this table is applicable 
to FORTRAN only. 
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Variable 
Name 



Description 



FORTRAN Variable Type 



isanum 
isatype 

index 



i/D 



if rame 
icurve 

i point 

value 



string 



dev: f ile.Xnn 



Men] 



represents a save area 

represents a save area type 
(matrix or dynamic curves) 

represents an index number 
which refers to a specific 
element of a save area or 
patient file. For example, 
the index number of the 
patient name is 1 and of 
the patient number is 2. 

represent the row (i) and 
column (j) indices of a 
matrix. Note that row 1, 
column 1 is the lower left 
corner of the matrix. 

represents a frame number 

represents a dynamic 
curve number 

represents a point number 
from a dynamic curve 

represents the value in an 
element of the data file 
or save area 



represents the equivalent of 
value if the element is an 
ASCII string 

represents the RT-11 file 
descriptor of a patient 
file 



represents the optional 
length of the logical 
array given by "string" 
above. This parameter is 
valid in FORTRAN only. 



integer 
integer 

integer 



integer , integer 



integer 
integer 

integer 



all value types 
within administrative 
and save area 
descriptor blocks are 
given in Tables 2-1 
and 2-2. Points on a 
dynamic curve are 
floating point. 

this variable should 
be a logical array 
in FORTRAN. 

this descriptor 
should be contained 
in a logical array in 
FORTRAN 

integer 



3.1.2 Patient Data File Subroutines 

The following subroutines reference the patient data files. Table 3-1 
shows the administrative data block layout with the indexes needed for 
subroutines GPAR, GPAW, GPDR, and GPDW, 
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Subroutine 

GPFR( , d.ev:£ile.'Xnn l ) 

or 
GPFR(string) 

or 
GPFR(string[ , len] ) 



Explanation 

Opens a patient file for read only processing. 
When a file is opened with this subroutine 
call, it cannot be modified. 
BASIC examples: 

CALL GPFR('RK1:NAME.X00') 
CALL GPFR(V$) 
However, if an ASCII string V$ is used, 
then V$='RK1:NAME.X00' must be defined 
before GPFR(V$) is called. 
FORTRAN examples 

CALL GPFRCRKlzJOHNDO.XOl') 
CALL GPFR(VA) 
CALL GPFR(VA,6) 
In these examples, VA is a logical array, 
and 6 is the length of the logical array. 
The 6 is optional. 



GPFW{ 'dev:file.Xnn' 



Opens a patient file for read or write 
processing. When a file is opened with this 
subroutine call, it can be modified. The 
alternate forms of the call and examples are 
similar to GPFR. 



GPFO 



Closes a patient file that is currently open. 
This subroutine should be used to ensure that 
all modifications to a file have been made. 



GPAR( index, string [ ,len] ) 



Returns in parameter string the ASCII string 
in element ( index) from the administrative data 
block. The parameter [,len] is the optional 
array length for the logical array in FORTRAN. 



GPAW( index, st ring [ ,len] ) 



Stores the ASCII string in element (index) of 
the administrative data block of the patient 
file. 



GPDR( index, value) 



Returns in value the value of element (index) 
in the administrative data block. 



GPDW ( index , value ) 



Stores value in the administrative data block 
as element ( index) . 



GPMR(if rame, i, j , value) 



Returns in value the value of element(i,j) of 
frame iframe of a study. This subroutine may 
only be used for static and dynamic studies. 



GPMW(if rame,i, j , value) 



Stores value as the element(i,j) of frame 
iframe. This subroutine may be used only for 
static and dynamic studies. 



GPLR(n,x,y,t,g) 



Returns from list mode element (n) , 
following values in the variables: 



the 



x = X-coordinate 
y = Y-coordinate 
t = 0, if there is no time mark 

= 1, if the time mark is set 
g = 0, if there is no gate mark 

= 1, if the gate mark is set 
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Subroutine 



GPLW(n,x,y,t,g) 



Explanation 

Note that for GPLR and GPLW, x, y, t, and g 
are integers (FORTRAN only) . 

Stores whatever is in x, y, t, and g into the 
list mode element number (n) . 



Table 3-1 
Administrative Data Block 



Ascii String Variable Table (FORTRAN and BASIC) 
Subroutines GPAR and GPAW >■ 



Index 



Name 



Description 



1 


PATNAM 


2 


PATNUM 


3 


ATIME 


4 


ADATE 


5 


BIRTHD 


6 


DOC 


7 


ORGAN 


8 


VIEW 


9 


CMTRT 


10 


AQMODE 


11 


ISOTOP 


12 


DOSE 


13 


IS02 


14 


DOSE2 


15 


ISMODE 


16 


ORIENT 


17 


POSSWT 


18 


AMACRO 


19 


AUTO 



Patient name 

Patient number 

Acquisition time (supplied by program) 

Acquisition data (supplied by program) 

Patient birth date 

Doctors name 

Organ being studied 

View of picture 

Collimator type 

Acquisition mode: l=special, 2=normal 

Isotope being used 

Dosage 

2nd isotope being used 

2nd dosage (dual isotope study) 

l=single isotope, 2=dual isotope 

Orientation switch 

Position (rotation) switch 

Auto analysis macro name 

Auto analysis switch (y or n) 



GATE-SYNCHRONIZED ACQUISITION (GSA) COLLECTION PARAMETERS 



20 


CAMID 


21 


GSAMTX 


22 


GSAFRM 


23 


GSADUR 


24 


GSATOL 


25 


GSAEFM 



Camera number (0-3) (NCV11 only) 

GSA matrix type (1 or 2) 

Number of frames 

Frame duration in msec 

Tolerance in msec 

End Frame (1, 2, or 3) 

1 = Time 

2 = Counts 

3 = Cycles 



31 


GSAPSC 


Preset 


counts 


32 


GSACYC 


Preset 


cycles 


33 


GSAMIN 


Preset 


minutes 


34 


GSASEC 


Preset 


seconds 



26 


ENDFRA 


27 


MINUTE 


28 


SECOND 


29 


PSCNT 



STATIC AND LIST COLLECTION PARAMETERS 

Method of ending study: l=time, 2=counts 
The number of minutes in the study 
The number of seconds in the study 
The number of preset counts chosen 
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Table 3-1 (Cont.) 
Administrative Data Block 



Index 



Name 



Description 



STATIC MODE COLLECTION PARAMETERS 

36 SMTXSZ The type of matrix (1, 2, 3, 4, or 5) 

37 SMTXCS Close on overflow: <space>=do not close, 

<t>=close 

38 MSFRM The number of frames 



41 
42 


LDBLCK 
LDBPC 


43 


LDELST 


44 


LDELRT 


45 


LGSA 



LIST MODE COLLECTION PARAMETERS 

The number of disk blocks of data 

Method of closing: l=by counts, 2=by number 

of blocks 

Method of starting: y=delayed start, 

n=immediate start 

Count rate for delayed start (maximum of 

20,000) 

If 'y', study in a gated list mode 

DYNAMIC MODE COLLECTION PARAMETERS 



51 


GRP1 


52 




53 




54 




55 




56 


GRP2 


61 


GRP3 



The number of frames in group 1 

The type of matrix (1, 2, 3 or 4) 

The type of close 

Frame rate: x frames 

Per y seconds (milliseconds for gated) 

Group 2 (same 5 paramenters as group 1) 

Group 3 



131 



GRP13 



Group 13 



Data Value Table (FORTRAN and BASIC) 
Subroutines GPDR and GPDW 



COLTYP 



2 
3 

4 


COMPRS 
TOTBLK 
FADOFF 


5 
6 
7 


DATTYP 

MDOFF 

PADOFF 


7 
8 


ZCTOFF 
NADOFF 


9 l 


ZCOUNT 


10 1 
11 
12 
13 


OVFTIM 
CFRM 
FRAMEN 
GROUPN 



Collection type 

Second byte < list mode 

= dynamic study 

> static study 
Offset to comment block 
Total number of blocks in study 
Offset to first admin block (multiple 
static) 

Data type: 0=patient data, l=flood 
Offset to matrix data 

Offset to previous admin block (multiple 
static) 

Dynamic: offset to z count block 
Offset to next admin block (multiple 
static) 

Z count, the number of events (double 
precision integer) 
Time of overflow clock counter 
Current frame number 
Total number of frames 
Total number of groups 
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Table 3-1 (Cont.) 
Administrative Data Block 



Index 



Name 



Description 



Collection time in seconds 

# cycles collected 
Total counts collected 

Frame duration in msec 
Tolerance in msec 

# rejected cycles 

1 Format of data is double precision integer (FORTRAN data type 
REAL*4) 



14 


BINSEC 


15 


BINCYC 


16 


BINZLO 




BINZHI 


17 


BINDUR 


18 


BINTOL 


19 


BINBAD 



3.1.3 Save Area Subroutines 

Only one save area can be opened for reading at a time with GSAR. 

However, with GSAW, you can write to any of the save areas--opened or 

unopened. The term current save area refers to the save area that is 
currently open. 

Table 3-2 shows the layout of the save area descriptor block and the 
indexes into the block needed by the save area subroutines. 

The following subroutines access the Save Areas. 



Subroutine 
GSAR( isanum, isatype; 



GSVG( index, value) 

GSVP( index, value) 

GMXG(i,j, value) 

GMXP(i,j, value) 

GCVG ( icurve, ipoint, value) 

GCVP (icurve, ipoint, value) 

GDIS( icurve) 



Explanation 

Opens save area isanum; The subroutine 
returns the save area type in isatype. 
isatype=l if the save area contains 
matrix data; isatype = -1 if the save 
area contains dynamic curves; 
isatype =0 if the save area contains 
neither matrix data nor dynamic curves or 
if the save area does not exist. 

Returns the value of element ( index) of 
the save area descriptor block. 

Stores value in element ( index) of the 
save area descriptor block. 

Returns the value of element(i,j) of the 
matrix. 

Stores value as element(i,j) of the 
matrix. 

Returns the value of point ipoint of 
curve icurve. 

Stores value as point ipoint of curve 
icurve. 

Plots curve icurve on the display. 
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Subroutine 
GPOV(icurve) 

GPKX(x) [BASIC ONLY] 



Explanation 

Plots curve icurve on the 
overlaying the previously 
curve. 



display, 
displayed 



Displays a cursor above a point plotted 
by GDIS or GPOV and waits for the user to 
pick a point. If the user types an "L" 
or an "R", the cursor moves to the left 
or the right, respectively. If the user 
types a "J", the cursor moves 10 spaces 
in the direction last typed. When the 



user types an "M" , 
number) returns as x. 



the x value (point 



GPKY(y) [BASIC ONLY] 



Same as subroutine GPKX except the y 
value (count rate) is returned. 



FGPICK (ix,y) [FORTRAN ONLY] Displays a cursor on the display above a 

point plotted by GDIS or GPOV. If the 
user types an "L" or an "R" , the cursor 
moves to the left or the right 
respectively. If the user types a "J", 
the cursor moves 10 spaces in the 
direction last typed. When the user 
types an "M" , FGPICK returns the position 
of the cursor in ix (integer) and y 
(real) . 



GSAW(isanum) 



GSAG ( index , str ing) 



GASP ( index , str ing) 



Writes the current save area 
area number isanum. 



into save 



Returns in string ASCII element (index) of 
the save area descriptor block. 

Stores string as the ASCII element (index) 
of the save area descriptor block. 



Table 3-2 
Save Area Descriptor Block 



Save Area String Table (FORTRAN and BASIC) 
Subroutines GSAG and GASP 



Index 



Name 



Description 



SINDX 
SCMDH 

SVIEW 



Index line (66 ASCII characters) 

GAMMA-11 command string (46 ASCII 

characters) 

View of frame (10 ASCII characters) 



Save Area Data Table (FORTRAN and BASIC) 
Subroutines GSVG and GSVP (FORTRAN and BASIC) 



NDXDEV 



RAD50 device name of indexed device 

2-4 FILNAM RAD50 file name and extension 

of file (3 integers) 
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Table 3-2 (Cont.) 
Save Area Descriptor Block 



Index 



Name 



Description 



NPFILE 

XTRBYT 
STYPE 



8 


SDTYP 


9 


SXPND 


10 


SLADFG 


11 


S ROT AT 


12 


SNESW 


13 


SSD 



14 



SDUAL 



15 


SORIG 


16 1 


SPOSOR 


17 1 




18 


SAQM 


19 


SFLDN 


20 


SPDTA 


21 


SPPAD 


21 


SPZCT 


22 


SPNAD 


22 


SPTOV 


23 


SPADM 


24 


SPCOM 


25 


SDAD 


26 


SDMOD 


27 1 


STHSH 


28 1 




29 l 


STHSL 


30 1 




31 


SSIZE 


32 


SWDBYT 


33 


SDIM 


34 


SMAX 


35 


SMIN 


36 2 


SCOUNT 


37 


SMEAN 



Numbers of patient files found on 
indexed device 

Number of extra bytes in directory entry 
Data type indicator (in low byte) 

= no data in save area 

1 = matrix data 

200 = dynamic curves 
Save register number in low byte 
negative number=frame divide is set 
Expand switch: 0=no expansion, non-zero= 
expanded matrix 

Sliding add switch (the number of frames 
to add) 

Rotation factor: 0-regular, 1, 2, or 3 
to rotate axes 
No enhancement switch 
Static or dynamic: Q-static, 
non-zero=dynamic 
Dual isotope switch: 0=no dual isotope 

1 = isotope A, 

2 = isotope B 

Original study type (non-zero=list mode) 

Position (rotation) switch 

Orientation switch 

Acquisition mode: 1-special, 2=normal 

Flood correction switch: 0-not done, 

l=flood correction done 

Offset to data matrixes 

Offset to previous admin block (static 

only) 

Offset to z-count block (dynamic only) 

Offset to next admin block (static only) 

Offset to time of overflow block 

(dynamic only) 

Offset to administrative data block 

Offset to comment block 

Relative block number of present frame 

Isometric switch: 0=intensity, 

l=isometrics 

High threshold in % 

Step size in % 

Low threshold in % 

Step size in % 

Number of words in current matrix 

Word or byte switch: 0=word, l=byte 

Dimension size (32, 64, or 128) 

Maximum cell count 

Minimum cell count 

Total number of counts 

The average cell count 
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Table 3-2 (Cent.) 
Save Area Descriptor Block 



Index 



Name 



STATIC MODE PARAMETERS 
Description 



121 


SMSCFR 


122 2 


SSTM 


123 2 


SSVTM 


124 2 


SSZCT 


125 


SSMSZ 


126 


SSFAD 



41 


SCRFRM 


42 


SCURGP 


43 


SCURGF 


44 


SCURFM 


45 


SN 


50 


SG 


51 


SGROUP(l) :SGPF 


52 


SGPSZ 


53 


SGPCS 


54 


SGXTM (SGX) 


55 


SGY 


56 


SGROUP(2) 



Current frame number of multiple static 

study 

Duration of collection in seconds 

Time of overflow in seconds 

Z count, the number of events 

Number of words in matrix 

Offset to first administration block 

DYNAMIC MODE PARAMETERS 



Cumulative frame number 

Current group number 

Current number of frames in group 

Current frame within group 

Total number of frames 

Total number of groups 

Number of frames in group 

Number of words of frames in the group 

The close on overflow flag 

Exposure rate: x frames per 

Y seconds (milliseconds for gated) 

Group 2 



111 



SGROUP(13) Group 13 

ROI AND DYNAMIC CURVE PARAMETERS 



130 


NMROIS 


131 


ROIXY(l) XI 


132i 
1331 
1341 
1351 


Yl 
X2 
Y2 
ROIXY(2) XI 


1751 
183 


ROIXY(12) XI 
IRM 


186 
187 
188 


SCELLS 

NMCELLS(l) 

NMCELLS(2) 



The number of regions of interest (max 

of 12) 

Region of interest definition table 

If XI and Yl are negative, the region is 

undefined 

XI = x-position of left ordinate 

Yl = y-position of lower abscissa 

X2 = right ordinate 

Y2 = upper abscissa 

ROI table number 2 



ROI table 12 

Irregular ROI switch: 0= regular region, 

non-zero= irregular 

The number of cells in the matrix 

Number of cells in region of interest 1 

Numbers of cells in ROI 2 
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Table 3-2 (Cont.) 
Save Area Descriptor Block 



Index 



Name 



Description 



198 

201 3 
202 3 
203 3 



NMCELLS(12) Cells in ROI number 12 

MAXCCR Maximum cell count rate for the matrix 

MAXCCR(l) Max. cell count rate for ROI 1 

MAXCCR(2) Max. cell count rate for ROI 2 



213 



201 2 
201 2 

203 2 



MAXCCR(12) Max. for ROI 12 

MATRIX SAVE AREA PARAMETERS 

ROICNT Cell counts for matrix 

ROICNT(l) Cell counts for each ROI (used with 

matrix data) 
R0ICNT(2) Cell counts for ROI 2 



213 



R0ICNT(12) 



Cell counts for ROI 12 



1 Byte data (FORTRAN uses INTEGER*2 format) 

2 Double precision integer data (FORTRAN uses REALM format) 

3 Floating point data (FORTRAN uses REALM format) 



3.1.4 General Purpose Support Subroutines for BASIC and FORTRAN 



GAM(string) 



Exits from BASIC or FORTRAN and loads the 
background GAMMA-11 program. BGAMMA is 
executed, and it interprets the string as 
the first command. If string is null, the 
background command table is displayed. If 
string is an illegal command, an error 
message is displayed and typing a carriage 
return will return GAMMA-11 to the command 
table. 



GCHR(str ing [ , line no, icolno] ) 



Prints the character string (string) 
starting at location (lineno, icolno) on 
the VSV01. The parameters lineno and 
icolno are optional. If lineno = negative 
number or zero (0) , the subroutine erases 
the screen. If you call GCHAR with only 
the string parameter (e.g. 
GCHAR(str ing) ) , the string is printed 
starting at the current cursor position. 
(NOTE: This subroutine works for the 
VSV01 display only.) You can reference 
only line numbers 1 through 25, and 
columns 1 through 64. 
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3.1.5 Linking FORTRAN Subroutines with a User Program 

For you to use the FORTRAN/GAMMA- 11 subroutines with your own program, 
you must link four FORTRAN object modules to your program. The four 
object modules are: 

GMFOR1.0BJ 
GMF0R2.0BJ 
GMF0R3.0BJ 
GMFERR.OBJ 

GMFORl.OBJ and GMFOR2.0BJ should always be linked with a user program 
whenever any of the support routines are referenced in the user 
program. You should link GMF0R3.0BJ when any curve plotting 
subroutines are used. You should always link GMFERR.OBJ because it 
contains the FORTRAN error messages. 

NOTE 

You can install the FORTRAN OTS library 
in SYSLIB.OBJ or in FORLIB. ORJ. See 
Section 2.4.1 of the RT-11 FORTRAN IV 
Installation Guide (DEC-11-LRSIA-A-D) . 
If you have installed the FORTRAN OTS 
library in SYSLIB.OBJ, you do not need 
the FORLIB or /F parameters when you 
link your FORTRAN program. 

If a program named PGM references only GAMMA-11 patient files, type: 

.LINK PGM, GMF0R1,GMF0R2,GMFERR, FORLIB 
If a program references save area data and plot curves, type: 

.LINK PGM, GMFORl,GMFOR2,GMFOR3,GMFERR, FORLIB 

If the overlay feature of the RT-11 Linker is used, GMFOR1 should be 
linked to the root section of the program. GMFOR2 , GMFOR3 , and GMFERR 
can be included in the overlays if desired. To use the overlay 
feature, type: 

.R LINK 

*PGM=PGM,GMF0R1,F0RLIB/C 

*GMFOR2/0:1/C 

*GMFOR3/0:1/C 

*GMFERR/0:1 



3.1.6 BASIC And FORTRAN Error Messages 

The error messages are the same for both the BASIC and FORTRAN support 
subroutines. However, the format of the messages vary between BASIC 
and FORTRAN. 

The format for the BASIC error messages is: 

?GAMMA-F-Save are numbers too large or negative AT LINE 20 

The line number of the line where the error occurred is given. In 
this example, the error occurred at line 20. In BASIC, the system 
returns to a READY when an error occurs. 
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The format for the FORTRAN error messages is: 

?GAMMA-F-Save area number too large or negative 
?Err Nbn-FORTRAN error call 
in routine ".MAIN.-" line 5 

The first line of the message states the problem. The second and 
third lines of the message state the routine name and line in which 
the error occurred. In this example, the error occurred in line 5 of 
the main program. In FORTRAN, the system returns to the RT-11 monitor 
when an error occurs. 

The error messages for the BASIC and FORTRAN support subroutines are 
listed below. 

Null file name 

Routines GPFR, GPFW 

A null string was given as the GAMMA patient file name. 

Illegal device 

Routines GPFR, GPFW 

An illegal device name was given in the string while opening the 

GAMMA patient file. 

Illegal file name 

Routines GPFR, GPFW 

Illegal RAD50 character was given as part of the GAMMA-11 patient 

file name. 

Non-file structured device 

Routines GPFR, GPFW 

A non-file structured device (e.g., paper tape, line printer) was 

given in the string while opening the GAMMA patient file. 

No device handler loaded 

Routines GPFR, GPFW 

The device handler is not in memory, and the GAMMA patient file 

cannot be opened. 

GAMMA file lookup error 

Routines GPFR, GPFW, GSAR 

A lookup error occurs trying to open a patient file or a save 
area file. This error usually means that the file is not on the 
device specified. 

GAMMA file not open 

All routines except GPFR, GPFW, GSAR 

Subroutine tried to reference a GAMMA patient file or save area 

file before it was opened. 

GAMMA file savestatus error 

Routines GPFR, GPFW, GPF, GPMR, GPMW, GPLR, GPLW, GSAR, GMXG, 
GMXP, GCVG, GCVP, GSAW 

Save status error occured during input/output operation (probable 
hardware error) . 
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GAMMA file reopen error 

Routines GPFR, GPFW, GPF, GPMR, GPMW, GPLR, GPLW, GSAR, GMXG, 
GMXP, GCVG, GCVP, GSAW 

Reopen error during an input/output operation (probable hardware 
error) . 

GAMMA file read error 

Routines GPFR, GPFW, GPF, GPMR, GPMW, GPLR, GPLW, GSAR GMXG, 

GMXP, GCVG, GCVP, GSAW 

Read error during I/O (probable hardware error) . 

GAMMA file write error 

Routines GPFR, GPFW, GPF, GPMR, GPMW, GPLR, GPLW, GSAR, GMXG, 

GMXP, GCVG, GCVP, GSAW 

Write error during I/O (probable hardware error) . 

Frame number too large or negative 

Routines GPMR, GPMW 

The frame number (iframe) is not within the range of the number 

of frames in the current patient file. 

List element too large or negative 

Routines GPLR, GPLW 

The list mode element (n) is outside the boundaries of the number 

of elements in the patient file. 

Index too large or negative 

Routines GPAR, GPAW, GPDR, GPDW, GSVG, GSVP, GSAG, GSAP 

The index number (index) exceeds the number of indices in the 

table that is being referenced. 

Curve number too large or negative 

Routines GCVG, GCVP, GDIS, GPOV 

The curve number (icurve) is greater than 12, the maximum number 

of curves in a save area. 

Point number too large or negative 

Routines GCVG, GCVP 

The point number (ipoint) is outside the boundaries of the number 

of points in the save area curves. 

Dimension too large or negative 

Routines GPMR, GPMW, GMXG, 

The element specified by (i,j) of the patient file or save area 

is outside the boundaries of the matrix. 

Save area number too large or negative 

Routines GSAR, GSAW 

The save area number (isanum) referenced exceeds 64, the maximum 

number of save areas. 
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Curve save area number too large or negative 

Routines GSAW 

An attempt was made to write a dynamic curve Save Area in a save 

area number (isanum) greater than 9. 

Illegal parameter value 

Routines All routines except GPFR, GPFW, GPF 

An illegal value (less than or equal to zero) is set for a 
subroutine parameter (e.g., index number (index), matrix 
dimension (i,j), point number (ipoint), frame number (ifame)). 
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3.1.7 BASIC and FORTRAN Examples 

BASIC Example 1 

The following example reads a patient summary and then prints it out. 
The important lines of this example are lines 20 and 30. In line 20, 
the user enters the patient file name which is stored in variable A$. 
In line 30, that file is opened for reading and writing. 

10 REM — READ IN PATIENT FILE — 

20 PRINT 'INPUT PATIENT FILE NAME' \ INPUT A* 

30 CALL GPFW<A*> 

40 PRINT 

50 REM — OUTPUT FILE SUMMARY — 

60 FOR 1=1 TO 20 

70 PRINT '*' t \ NEXT I 

80 PRINT \ PRINT 

90 PRINT 'PATIENT! '? \ FOR 1=1 TO 8 

100 CALL GPAR<I,B*> \ PRINT B* 

110 NEXT I 

120 CALL GPDR<12rB> 

130 PRINT 'NUMBER OF FRAMES = 'JB 

140 PRINT 

150 FOR 1=1 TO 20 

160 PRINT '*'? \ NEXT I 

170 CALL GPFO 

180 END 

READY 



BASIC Example 2 

The following example integrates a dynamic curve. The user picks the 
save area where the curve is stored, the curve to be displayed, and 
the left and right bounds of the integral. Since the raw counts are 
stored with the curve data, the integral is merely a summation of the 
counts between the boundaries chosen (using subroutine GCVG in line 
110) . 

20 REM — READ DYNAMIC CURVE SAVE AREA — 
30 PRINT 'WHICH SAVE AREA' J \ INPUT Al 
35 CALL GSAR<A1,A) 

40 REM — READ CURVE INTO THE BUFFER — 

50 PRINT 'WHICH CURVE TO BE DISPLAYED' J \ INPUT Bl 

55 CALL GDIS(Bl) 

60 REM — FIND THE NUMBER OF POINTS — 

70 CALL GSVG<41rB) 

80 REM — FIND THE INTEGRAL OF THE CURVE 

90 1=0 

100 PRINT 'THERE ARE' JB i 'POINTS' 

102 PRINT 'PICK THE BOUNDS OF THE INTEGRAL' 

104 CALL GPKX<D) \ CALL GPKX(E) 

106 FOR J=D TO E 

110 CALL GCVG(B1fJ»K> 

120 0=I+K 

130 NEXT J 

140 PRINT 'INTEGRAL OF CURVE' JB1 J ' = ' >I 

150 END 

READY 
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BASIC Example 3 

The following example initializes a save area to hold static matrix 
data. The user picks the save area to be initialized. Then that save 
area is opened as a virtual file (lines 40, 50, and 60) to allow the 
program to zero the save area descriptor block (lines 80 and 90) . The 
user chooses the type of matrix and the subroutine initializes the 
save area descriptor block. Finally, in lines 160 to 200, the matrix 
is filled (with whatever you choose) . In this example, an "X" is put 
in the matrix. Then the BASIC program returns to the GAMMA-11 data 
analysis program to continue analysis. 

10 REM — ZERO SAVE AREA DESCRIPTOR BLOCK -- 

20 REM 

30 PRINT \ PRINT 'SAME AREA MATRIX INITIALIZATION' 

40 PRINT \ PRINT 'WHICH SAVE AREA'* \ INPUT A3$ \ LET A3=VAL(A3*> 

50 LET A*='SVAR0'SA3*&'.SYS' 

60 DIM #1>F1<255) 

70 OPEN A* AS FILE 1 

80 FOR 1=0 TO 255 \ LET FKI)=0 \ NEXT I 

90 CLOSE 1 

100 REM 

110 REM — CHOOSE MATRIX TYPE* THEN INITIALIZE 

120 REM 

130 PRINT 'WHAT MATRIX SIZE :< 32t6At 128) ' ? \ INPUT Al 

140 PRINT 'BYTE OR WORD: < 1=BYTE ,0=W0RD)/ ' i \ INPUT A2 

150 CALL GSAR(A3»Z) \ G0SUB 210 

160 FOR 1=1 TO Al \ LET J=A1+1-I 

170 CALL GMXP(I>I,I) \ CALL GMXP(IrJrJ) 

180 NEXT I 

190 CALL GSAWCA3) 

200 CALL GAM('CA') 

210 REM 

220 REM — MATRIX INITIALIZATION SUBROUTINE 

230 REM SET TO INIT A STATIC MATRIX 

240 REM — Al=SIZE(32r44»128)..A2=BYTE<l)..0R WORD (0) 

250 REM 

260 CALL GSVP<7»1>. \ CALL GSVP<8,A3) 

270 CALL GSVP<27,100> \ CALL GSVP<28r5) 

280 CALL GSVP(29fO) \ CALL GSVP<30r5) 

290 LET A4-512 

300 IF Al=32 THEN 320 \ LET A4=A4*4 

310 IF Al=64 THEN 320 \ LET A4=A4*4 

320 IF A2=l THEN 330 \ LET A4=A4*2 

330 CALL GSYP<31>A4> \ CALL GSVP<125>A4> 

340 CALL GSVP(32rA2> \ CALL GSVF<33>A1> 

350 CALL GASP( It 'GAMMA-11 SAVE AREA') 

360 RETURN 

370 END 

READY 
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BASIC Example 4 

The following macro creates the playback file GSA.GPB, plays the 
playback, calls the BASIC program NEWNME (line 4), and then plays the 
playback file a second time. Program NEWNME changes the patient file 
index line in the playback file called GSA.GPB. When the program is 
finished, the macro will continue execution and replay the playback. 

MACRO 

1) PBI GSA, 0,48,1 

2) RS0;BE;LT10 

3) 48:PBS;!SK 

4) PB GSA;BA NEWNME 

5) PB GSA 

BASIC PROGRAM NEWNME 

10 DIM #1,A*(16)=64 

20 OPEN 'GSA.GPB' AS FILE #1 

30 PRINT 'OLD PATIENT INDEX: ' i A$(2> 

40 PRINT 'INPUT NEW INDEX! '» \ INPUT B* 

50 LET A*(2)=B* 

60 CLOSE #1 

70 CAL GAM('CA') 



FORTRAN Example 1 

The following FORTRAN example is similar to BASIC Example 3. This 
program initializes a save area to hold static matrix data. The main 
program asks the user for the save area number, opens the save area, 
initializes the save area descriptor block (subroutine INITMA) , and 
fills the matrix (subroutine FILLMA) . Subroutine IALPH converts the 
numeric save area number to ASCII data for the save area name. 



INTEGER NAME(6)tADMIN(256> 
1 FORMAT (12) 

NAME(1) = 'SV 

NAME<2)='AR' 

NAME < 4 ) - ' ♦ S ' 

NAME(5)='YS' 

NAME(6>=0 

TYPE *t 'SAVE AREA MATRIX INITIALIZATION' 

TYPE *> 'WHICH SAVE AREA?' 

ACCEPT *, NUM 

ENC0DE<2rl>NAME<3)> NUM 

OPEN ( UNI T= 1 f NAME=NAME t ACCESS* ' DIRECT ' r TYPE= ' UNKNOWN ■' r 
lREC0RDSIZE=128fINITIALSIZE=33»ASS0CIATEVARIABLE~Nl) 

DO 100 1=1,256 
100 ADMIN(I)=0 

WRITEd'DADMIN 

WRITE(1'33)ADMIN 

CL0SE(UNIT=1) 

TYPE *r 'WHAT MATRIX SIZE: (32*64* 128) ' 

ACCEPT *r NSIZE 

TYPE *> 'BYTE OR WORD: ( 1=BYTE*0*W0RD) ' 
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ACCEPT *f NTYPE 

CALL GSAR<NUM»M> 

CALL INITSA<NSIZE, NTYPE, NUM) 

CALL INITMA(NSIZE) 

CALL GSAW(NUM) 

CALL BGAMhA< 'CA'> 

STOP 

END 



SUBROUTINE INITSA<NSIZE» NTYPE, NUM> 

CALL GSVP<7,1> 

CALL GSVP(8,NUM) 

CALL GSVP<27,100) 

CALL GSVP<28,5> 

CALL GSVP(29>0> 

CALL GSVP<30,5> 

I==512 

IF<NSIZE. EG. 64)1-1*4 

IF<NSIZE.EQ. 128) 1=1*16 

IF<NTYPE.EQ*0>r=I*2 

CALL GSVP(31»I) 

CALL GSVP(125,I> 

CALL GSVPC 32, NTYPE) 

CALL GSVP(33,NSIZE) 

CALL GASPC1, 'GAMMA-11 SAVE 

RETURN 

END 



AREA ',22) 



too 



SUBROUTINE INITMA(NSIZE) 

DO 100 I=1»NSIZE 

J=NSIZE+1-I 

CALL. GMXP<I,I,I> 

CALL GMXP(I,J,J> 

RETURN 

END 
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3.2 SUPPLEMENTAL FORTRAN SUPPORT 

Besides the FORTRAN support routines listed in Section 3.1, other 
FORTRAN routines exist to access patient files and save areas, and to 
plot dynamic curves. The routines listed in this section do not 
perform input and output operations on the patient files and save 
areas. To use these supplemental routines, you must first assign and 
define the input and output files as random access files and then read 
the appropriate blocks into arrays before calling the routines. Refer 
to Tables 3-1 and 3-2 for a description of the internal structure of 
the patient files and save areas. 



3.2.1 FORTRAN and GAMMA-11 Variables 

The variables used in the GAMMA-11 files are not compatible with 
FORTRAN IV. The GAMMA-11 variables are unsigned (i.e., not 2's 
complement) numbers. FORTRAN IV variables must be signed. 

Below is the notation that is used to denote the GAMMA-11 and FORTRAN 
variable types. 

GAMMA-11 Variables 

Contents 

Unsigned, 8-bit datum 

Unsigned, 16-bit datum 

Unsigned, 32-bit double precision 
integer. 

FORTRAN Variables 

integerf INTEGER*2 Signed integer 

realf REAL*4 Real, floating point number 



3.2.2 Arrays 

When you use this set of FORTRAN support routines, you must handle 
inputting and outputting the files yourself. The following array 
notation describes the format for handling these files. 

Name Description 

rawfile A 512-byte array in which you load the entire 

administrative data block of a patient study 
(using a direct-access read) . 

patientinfo A real array, dimensioned (3,42), which contains 

ASCII data converted from rawfile. The 
patientinfo array is obtained from the rawfile 
array by using subroutine FGADM1. 

ipointers A 75-word integer array which contains pointers 

and parameters from the administrative data block 
contained in array rawfile. The pointers array is 
obtained from array rawfile by using subroutine 
FGADM1 . 
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Data Type 


g8 


L0GICAL*1 


gie 


INTEGER*2 


g32 


REAL*4 or 




INTEGER*4 
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Name 
rawcomments 

comments 



savearea 



curve 



Description 

A 510-byte array which contains the comment block 
of the patient study (read by a direct-access 
read) . 

A 510-byte logical array dimensioned (51,10) which 
contains the ASCII text of the comment block. The 
array comments is obtained from the array raw 
comments using subroutine FGCOM1 . Each position 
of the array is one ASCII character. 

A 256-word array containing the descriptor block 
of a save area (read by a direct-access read) . 

A 512-real element array containing a dynamic 
curve read from a save area (read by a 
direct-access read) . 



3.2.3 Functions 

The following functions convert unsigned integer data from GAMMA-11 to 
signed integer or floating point format of FORTRAN IV. 



IBYTE(g8) 
RSPI(gl6) 
RDPI(g32) 



Returns the byte datum, g8, as a signed integer, 
integerf. 

Returns the 16-bit unsigned integer, gl6, as a 
floating point number, realf. 

Returns the unsigned 32-bit integer, g32 as 
floating point number, realf. 



The following functions convert FORTRAN IV data to GAMMA-11 format. 



LBYTE (integerf) 

ISPR(realf) 

RDPR(realf) 



Returns the signed integer, integerf, as an 
unsigned 8-bit integer, g8. 

Returns the floating point number, realf, as an 
unsigned 16-bit integer, gl6. 

Returns the floating point number, realf, as an 
unsigned 32-bit integer, g32. 



GAMMA-11 word data does not have to be converted to real format unless 
the number of cell counts exceeds 32767. In a typical study, such 
large cell counts are extremely unlikely. 



3.2.4 Subroutines 

The following subroutines process GAMMA-11 patient studies. 

FGADM1 (rawfile, pointers, patient info) 

Converts the patient administrative data block in array 
rawfile into the ASCII array patientinfo and parameter 
pointer block pointers. If patientinfo is not 
specified, no ASCII data is converted. Rawfile and 
patientinfo, or rawfile and pointers cannot be 
equivalenced. 
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FGADM2 (rawf ile, pointers, patient info) 

The ASCII array patientinfo and parameter pointer block 
pointers are converted into a patient administrative 
data block in array rawfile. Rawfile and patientinfo, 
or rawfile and pointers cannot be equivalenced. 

PGC0M1 (rawcomments, comments) 

Converts the comment block (in rawcomments) into a 
FORTRAN ASCII array comments. 

FGC0M2 (rawcomments, comments) 

Converts the FORTRAN ASCII array comments into a 
GAMMA-11 comment block rawcomments. Rawcomments and 
comments can be equivalenced. 

IFGFRM ( ipo inter s, i) 

A function which returns the record number of frame i. 
The array ipointers is the pointer array set up by 
FGADM1 . 

IGLSTR(n,x,y) Return the x and y coordinates of the list mode element 
n. The function returns 1 of 4 possible values. 

2 Time mark not set, gatemark set. 

1 No time mark, no gatemark. 
-1 Time mark set, gatemark not set. 
-2 Time mark set, gatemark set. 

Note that for IGLSTR and IGLSTW, x, y, t, and g are 
integers. 

IGLSTW(x,y,t,g) 

A function which returns a list mode element number from 
the four parameters, x, y, t, and g. 

NOTE 

FORTRAN record numbers are one greater 
than RT-11 block numbers. 

The following subroutines reference save area data. 

FGPLOT(savearea, curve) Plots a dynamic curve on the display. The 

array savearea contains the save area 
descriptor block and curve is an array that 
contains the floating point dynamic curve 
data. 

FGPICK(ix,y) Displays a cursor on the display above a point 

already displayed by FGPLOT. The user can 
move the cursor with the keyboard commands "R" 
(right) and "L" (left) . The keyboard command 
"J" jumps 10 spaces in the direction last 
typed by the user. When the user types "M" , 
the position of the cursor is returned in the 
ix and y parameters. 

FGPTOV (savearea, curve) Plots a dynamic curve on the display that 

overlays the previously displayed curve. 

BGAMMA (command) Exits from FORTRAN and loads the background 

GAMMA-11 program. BGAMMA is executed and it 
interprets the ASCII characters in the real 
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variable, command, as the first command. If 
command is blank (i.e., contains ASCII 
blanks) , the background command table is 
displayed. If the characters form an illegal 
command, an error message is displayed, and 
typing a carriage return will return GAMMA-11 
to the command table. 



3.2.5 Linking Supplemental FORTRAN Subroutines With A User Program 

There are three object files included in the supplemental FORTRAN 
support package. These are: 

F4R00T.0BJ 
F4PLOT.OBJ 
F4ADMN.0BJ 

F4R00T.0BJ should always be linked with your program whenever any of 
the supplemental support routines are referenced. F4PLOT.OBJ is 
linked when any curve plotting subroutines are used. F4ADMN.0BJ must 
be linked when any subroutines that reference GAMMA-11 patient studies 
are referenced within your program. 

The following list shows subroutine calls that are referenced within 
the three files of the supplemental support package. 

Object File FORTRAN Supplemental Support Subroutines 

F4R00T IBYTE, LBYTE , RSPI, ISPR, RDPI , RDPR, BGAMMA 

F4PL0T FGPLOT, FGPTOV, FGPICK 

F4ADMN FGADM1, FGADM2 , FGCOM1 , FGCOM2 , IFGFRM, IGLSTR, 

IGLSTW 

If the overlay feature of the RT-11 linker is used, F4ROOT should be 
linked to the root section of the program. F4ADMN and F4PL0T can be 
included in the overlays if desired (see following example) . 

1. If a program references only GAMMA-11 patient files, type: 

.LINK PGM,F4ROOT,F4ADMN,FORLIB 

2. If a program references only save area data and curves, type: 

.LINK PGM,F4ROOT,F4PLOT,FORLIB 

3. If a program references both GAMMA-11 patient files and save 
area data and curves, type: 

.R LINK 

PGM=PGM, F4ROOT , FORLIB/C 

F4ADMN/0:1/C 

F4PLOT/0:! 



3.2.6 FORTRAN Example 

The following program is an example of a FORTRAN program using the 
supplemental GAMMA-11 FORTRAN support. 
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C 

C READ A FRAME INTO ARRAY MAT 

C 

DO 2 II=lr64r8 
2 READ(l'Nl) (<MAT<J»K>>K=l,A4>>J*IIfII+7> 
C 

C CONVERT THE GAMMA DATA INTO FORTRAN FORMAT* 
C THEN CHECK EACH ELEMENT FOR NEW MAXIMUM 
C 

DO 1 1=1 >64 

DO 1 J=l>64 

MX==IBYTE(MAX(Ir J)) 

PT=IBYTE(MAT<I> J)) 

IF(MX-PT ,GE. 0) GOTO 1 
C 

C IF NEW MAXIMUM* STORE COUNT AND TIME 
C 

MAX(I»J)=MAT(I»J) 

TIM<I>J)=LBYTE<IJ) 
1 CONTINUE 
C 

C ELIMINATE COUNTS UNDER 5 
C 

DO 12 I=--lr64 

DO 12 J=l»64 

IF(lBYTE(MAX<;i»J)> *LT. 5) TIM(I»J>-0 
12 CONTINUE 
C 

C RECONVERT INTO GAMMA FORMAT 
C 

CALL FGADM2( ADMIN. P>B) 

N2*i 
C 

C WRITE ALL BLOCKS PRECEDING DATA 
C 

WRITE<2'N2) ADMIN 

DO 15 KK=2»MD0FF-1 

READd'KIOADMIN 
15 WRITE(2'N2) ADMIN 

C 

C WRITE EITHER TIME OR COUNTS INTO FRAME 
C 

WRITE (5. 444) 

444 FORMAT (' '» 'DO YOU WANT TIME OR INTENSITY FOR THE MATRIX?') 
WRITE (5.445) 

445 FORMATC '.'TYPE 1 FOR TIME. 2 FOR MAX* INTENSITY'//) 
RE AD (5. 446) IP 

446 FORMAT (II) 

IF (IP- 2 .GE* 0) GOTO .1.22 
DO 7 1=1.64*8 

7 WRI TE ( 2 ' N2 ) ( ( T IM ( J . K > r K* 1 . 64 ) . J- I . 1+7 ) 
STOP 

122 DO 8 1-1.64 . 8 

8 WRITE(2'N2) ( ( MAX ( J.K ) . K :: = : 1 . 64 ) . J=I . 1 + 7 ) 
STOP 

END 
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C 

C FORTRAN SUPPORT EXAMPLE 

C 

C ** FUNCTIONAL IMAGING PROGRAM ** 

C 

C THIS PROGRAM WILL STEP THROUGH A DYNAMIC STUDY LOOKING 

C FOR MAXIMUM VALUES AT EVERY MATRIX POSITION <I»J). 

C IT WILL RECORD THE TIME OF EACH MAXIMUM ALSO <TIM<64,64>) 

C 

LOGICAL*l MAT<64r64>rTIM<64r64>fMAX(64f64>»ADMIN<512) 

INTEGER*2 Nl r N2»NAMErNAME2»P<75> r MX» PTr IP 

REAL*4 B<3»42)»FMfIM 
C 

C ZERO VARIABLES IN ARRAYS 
C 

DATA FM/'FN IV 

DATA I M/' MAGE'/ 

DATA ADM I N/5 12*0/ 

DATA P/75*0/»B/126*0./ 

DO 333 I -1,64 

DO 334 J=l,64 

MAT<IrJ)=0 

MAX<I»J>*0 
334 TIM<I>J>=0 
333 CONTINUE 
C 

C INPUT FILE NAMES FROM KEYBOARD 
C 

WRITE<5f222) 
222 FORMAT <' ',' 'INPUT PATIENT FILE AND NEW FILE NAME V/) 

CALL ASS I GN < 1 > NAME t - I. * ' RDO ' t ' NC ' ) 

CALL ASSIGN < 2 » NAME2 1 -1 r ' NEW ' r ' NC ' ) 
C 

C DEFINE FILES FOR RANDO ACCESS I/O 
C 

DEFINE FILE 1 < 1000 » 256 »U»'N1 > 

DEFINE FILE 2 < 20 v25A* U r N2 > 

Nl = l 
C 

C READ BLOCK (RECORD 1) AND CONVERT FROM GAMMA FORMAT 
C TO FORTRAN FORMAT 
C 

READCt'Nl) ADMIN 

CALL . FGADM1 < ADMINr P » B > 

MD0FF=*IF6FRM<P>1> 
N1«MD0FF 

C 

C CONVERTR PRAMETERS FROM DYNAMIC TO STATIC 

C 

P <:l. > = J. 

PCI. 4) ^3 

P<20)*1 
C 

C STORE 'FUNCTIONAL IMAGE' MESSAGE 
C 

BCI. >10)^FM 

B(2»10)-IM 

NFRMS=P(9) 

DO .1. IJ^lrNFRMS 
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CHAPTER 4 
ASSEMBLING AND LINKING GAMMA- 11 



You can assemble and link GAMMA-11 by using the RT-11 MACRO and LINK 
commands. Indirect command files which contain all the commands 
required to assemble and link GAMMA-11 are included on the GAMMA-11 
source media (DEC-11-MGAMA-C-EC, ED or ET) . 



4.1 ASSEMBLING GAMMA-11 USING INDIRECT COMMAND FILES 

To assemble GAMMA-11, assign three logical devices and call two out of 
three indirect command files. The three indirect command files for 
assembling GAMMA-11 are 

GMASMC.COM Display-independent assemblies 
GMASMV.COM VSVOl-dependent assemblies 
GMASMS.COM VTOl-dependent assemblies 

To assemble GAMMA-11 for the VSV01 color display, use command files 
GMASMC and GMASMV. To assemble GAMMA-11 for the VT01 display storage 
scope use command files GMASMC and GMASMS. 

These indirect command files use three logical device assignments: 

SRC for the source file device (MACRO-11 input device) 
OBJ for the object file device (MACRO-11 output device) 
LST for the listing device (MACRO-11 listing device) 

You must use the RT-11 ASSIGN command to assign physical devices to 
the logical devices before using the indirect command files. If you 
do not want the object files or the listing files, assign the null 
device handler (NL) to OBJ or LST. 

NOTE 

Each indirect command file generates 
about 3000 blocks of listings. Thus, if 
you assign an RK05 to LST, this disk 
becomes full if other files are also on 
it. 
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For example, the following RT-11 commands would be used to assemble 
GAMMA-11 for the VSV01 display with the source files on RK05 drive 0, 
the object files on RK05 drive 1, and the listing on the line printer: 

.ASSIGN RKO SRC 
.ASSIGN RK1 OBJ 
.ASSIGN LP LST 
. @GMASMC 
.@GMASMV 



************* gmasm: 



:om *******♦*♦*****♦*»**♦** 



GAMMA-11 V2C DEVICE INDEPENDENT ASSEMBLIES 



****** m1sc, system summary, transfer, delete *** 

macro/list :lsi":dartim/ob j: or j: dat tim/ all: 20. src:dattim 

macro/list:lst:acqdev/ohj:obj:acqdev/all:20. src:acqdev 

*acro/list:Lst:gamfil/obj:obj:gamfil/all:20. src:Gamfil 

macr3/list:lst:memmng/06j:obj:memmng/all:20. src: mem mng 

macr0/list:lst:syssum/ubj:0bj;syssum/all:20. src :( syssum+gaml ib/lib ) 

* ac r3/ li st: lst: delete/ 38 j: ob j: delete/ all: 20. src: ( delete *gamhb/ lib) 

macro/list:lst:trnfeh/obj:obj:rrnfer/all:40. src : ( trnfep+gamlib/lib) 



*********** DATA ACQUISITION *♦**♦♦**♦******♦*** 



MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACR3 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 



/LIST 


LST: 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


LST! 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


lst: 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


lst: 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


LST: 


/LIST 


LST: 



BACQCM/ 
FACQCM/ 
FACQCM/ 
DYNACO/ 
EDYNAQ/ 
STCACQ/ 
ESTCAQ/ 
LSTACQ/ 
FLSTAQ/ 
ELSTAQ/ 
BACOSB/ 
FACQSB/ 
EACQSB/ 
BACQST/ 
FACQST/ 
EACQSIV 
BAQSEIV 
FAQSET/ 
EAQSET/ 
PREDEF/ 
GSAACQ/ 
PATMON/ 
P ADM IN/ 
RdAVE/O 



BAC 
FAC 
EAC 
DYN 
EDY 
STC 
EST 
LST 
FLS 
ELS 
BAC 
FAC 
EAC 
BAC 
FAC 
EAC 
BAD 
FAQ 
EAQ 
PRE 
GSA 
PAT 
PAD 
BJ:OBJ:R^AV 



OBJ 


OBJ: 


OBJ 


OBJ: 


OBJ 


•OBJ: 


OBJ 


obj: 


OBJ 


OBJ: 


OBJ 


:OBJ: 


OBJ 


OBJ: 


OBJ 


OBJ: 


OBJ 


obj: 


OBJ 


obj: 


OBJ 


OBJ: 


OBJ 


OBJ: 


OBJ 


OBJ: 


OBJ 


OBJ: 


OBJ 


OBJ: 


OBJ 


OBJ: 


OBJ 


OBJ: 


OBJ 


OBJ: 


OBJ 


obj: 


OBJ 


,obj: 


OBJ 


obj: 


OBJ 


OBJ: 


OBJ 


obj: 



QCM/ALL 
QCM/ALL 
QCM/ALL 
ACQ/ALL 
NAQ/ALL 
ACQ/ALL 
CAQ/ALL 
ACQ/ALL 
rAQ/ALL 
TAQ/ALL 
QSB/ALL 
QSB/ALL 
QSB/ALL 
QST/ALL 
QST/ALL 
QST/ALL 
SET/ALL 
SET/ALL 
SET/ALL 
DEF/ALL 
ACQ/ALL 
M0N/ALL 
MIN/ALL 
E/ALL:2 



20. SRC 

20. SRC 

20. SRC 

20. SRC 

20. SRC 

20. SRC 

20. SRC 

20. SRC 

20. SRC 

20. SRC 

20. SRC 

20. SRC 

20. SRC 

20. SRC 

20. SRC 

20. SRC 

90. SRC 

90. SRC 

90. SRC 

20. SRC 

20. SRC 

20. SRC 

20. SRC 
0. SRC:R 



( ACQCMN 
(FJ03+A 
(EFJ3B+ 
(DYNACQ 
(EFJ3B+ 
(STCACQ 
(EFJ3B* 
(LSTACQ 
(FJ08+L 
(F.FJDB* 
(ACQSB* 
(FJ3B+A 
(EFJDB+ 
(ACQSTR 
(FJOB+A 
(EFJOB-f 
(AQS1+A 
(FJ33+A 
(EFJOB* 
(PREDEF 
CGSAACQ 
(PATMON 
(SB+APS 
AlAVE 



♦APSECT+ 
CQCMN+AP 
ACQCMN+A 
+APSECT+ 
DYNACQ+A 
♦APSECT+ 
STCACQ+A 
+APSECT* 
STACQ+AP 
LSfACQ+A 
APSECT+G 
CDSB+APS 
ACQSB+AP 
+APSECT+ 
CQSTR+AP 
ACQSTR+A 
QS2+GSAS 
QS1+AQ52 
AQSUAQS 
♦APSECT+ 
♦APSECTt 
♦APSECT* 
ECT) 



GAMLIB/L 
SECT+GAM 
PSECT+GA 
GAMLIB/L 
PSECT+GA 
GAMLIB/L 
PSECT+GA 
GAMLIB/L 
SECT+GAM 
PSECT+GA 
AMLIB/LI 
ECT+GAML 
SECT+GAM 
GAMLIB/L 
SECT+GAM 
PSECT+GA 
ET+APSEC 
+APSECT+ 
2+APSECT 
GAMLIB/L 
GAMLIB/L 
GAMLIB/L 



IB) 

LIB/LI3) 

MLIB/LIB) 

IB) 

MLIB/LIB) 

IB) 

MLIB/LIB) 

IB) 

LIB/LIB) 

MLIB/LIB) 

B) 

IB/LIB) 

LIB/LIB) 

IB) 

LIB/LIB) 

MLIB/LIB) 

T+GAMLIB/LIB) 

GAMLI8/LIB) 

+GAMLI8/LIB) 

IB) 

IB) 

IB) 
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I*********** DATA ANALYSIS ********************** 



MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 



/LIST! 
/LIST; 
/LIST: 
/LIST: 
/LIST: 
/LilST: 
/LIST: 
/LIST: 
/LIST: 
/LIST: 
/LIST', 
/LIST: 
/LIST: 
/LIST: 
/LIST: 
/LIST: 
/LIST: 



LST 

Lsr 

LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 

lst 



FRMST1 
FRMST2 
AOMIN/ 
FLOOD/ 
INDEX/ 
DX/OBJ 
ERROR/ 

cjmma: 

FLDLV2 
VMARK2 
R3ILV2 
PPPLV2 
DATAR1 
JJY/OB 
LIST/O 
FPMPEX 
BUFSET 



/OBJ:OB 
/QBJ:OB 
OBJ:OBJ 
OBJ:OBJ 
OBJ: OBJ 
:OBJ:DX 
OBJtOBJ 
RO/OBJ: 
/OBJ: OB 
/OBJ:OB 
/OBJ:OB 
/OBJ:OB 
/OBJ: OB 
J: OBJ: J 
BJ:OHj: 

/OBJ: 08 
/08J:0B 



FRMST 
FRMST 
DMIN/ 
L03D/ 
NDEX/ 
LL:20 
RR3R/ 
J:C3M 
FLDLV 
VMARK 
ROILV 
PPPLV 
DATAR 
/ALL: 
ST/AL 
FPMPE 
BUFSE 



1/ALL: 
2/ALL: 

all:20 

ALL:20 
ALL:20 
. SRC: 
ALL:20 
MACRO/ 

2/all: 

2/ALL: 

2/ALL: 

2/ALL: 

1/ALL: 

20. SR 

L:20. 

X/ALL: 

T/ALL: 



20. 
20. 
. S 
. S 

. S 
(OX 
. S 

ALL 
20. 
70. 
20. 
20. 
20. 
C:( 
SMC 
20. 
20. 



SR 
SR 

RC: 
RC: 

RC: 

+ cs 

RC: 

:20 

SR 

SR 

SR 

SR 

SR 

jdy 

:(L 

SR 
SR 



IS 



(FR 
(FR 
DMI 
LJO 

MDE 

r + G 

RRU 

SRC 

:(FL 

: ( vm 
:(RO 
:(PP 
:( JA 
CSEC 

r+c 

FPM 
rt JF 



MST1 
MST2 
^♦CS 
D + CS 
X + CS 
AMLl 
RtCS 

:(CO 

•5LV2 

ARK2 

ILV2 

PLV2 

TAR1 

T + GA 

SECT 

PEX 

SET 



SECT+GAMLIB/LIB) 

SECT+GAMLIB/LIB) 

T+GAMLIB/LIB) 

T+GAML13/LIB) 

T+GAMLIB/LIB) 

LH) 

T+GAML13/L1B) 

AC+CSECT+GAMLIB/LI3) 

SECT+GAMLIB/LIB) 

SECT+GAMLI3/LI3) 

SECT+GAMLIB/LIB) 

SECT+GAMLIB/LIB) 

SECT+GAMLIB/LIB) 

1B/LTB) 

AMLIB/LEB) 



*********** BASIC SUPPORT ********************** 



MACRO/HST:LST:GMBEPR/;JBJ:GM3ERR/ALL:20. SPC:(ERRGA-1) 

*********** FORTRAN SUPPORT *****♦**♦♦*♦******** 
MACRO/ LIS T : LST : GMFERR/ Hi J :GMFERR/ ALL: 20. SRC : ( F3R I +ERRGA V ) 
I ************** ?; M [) ***************************** 



> ************ GMASMV.COM *********************** 



13AMMA-11 V2Z VS^Ol DEPENDENT ASSEMBLIES 



I*********** 9GAMMA **************************** 



ma: 
ma; 



:r3/list:lst:gamrum/obj:gamrum spc: (GAmlib/lib+gamrjm) 
:ro/list:lst:bgcomd/ohj:bg:dmd src: (GAmlib/lib+bgcomd) 



l*********** DATA ANALYSIS ********************* 



MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 
MAC 



RO/LlSr 
RO/LIST 
RO/LIST 
RO/LIST 
RO/LIST 
RD/LIST 
RO/LIST 
R3/LIST 
RO/LIST 
RO/LIST 
RO/LIST 
R0/LIS1 
RO/LIST 
RO/LIST 
RO/LIST 
RO/LIST 
RO/LIST 
R3/LIST 
RO/LIST 
RD/LIST 
RO/LIST 
RO/LIST 
RO/LIST 



LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 



DATAR 
GSAFR 
VTDIS 
VTTEX 
CJLED 
CJMND 
IC/OB 
P3ST0 
P3MER 
P3ACK 
HJI/O 
P?P/0 
I NIT/ 
SLICE 
GSATO 
INITR 
C3MND 
DUAL/ 
DISCM 
DATAR 
DISPA 
VTdPI 
NRCTB 



<\i/OBJ:OB 
M /OBJ: OB 
P/OBJ:OB 

t/obj:ob 

T/OBJ:OB 
1/3BJ:0B 
J:obj:IC 

R/0BJ:3B 
G/OBJ:OB 
/03J:JBJ 
bj:ubj:R 
bj:obj:P 
obj:obj: 

/OBJ.'OBJ 

l/obj:ob 

I /OBJ: OB 

2/obj:ob 
obj:obj: 
D/OBJ:OB 
1/3BJ:0B 

t/obj:ob 

T/OBJ:OB 
L/OBJ:OB 



J:DAT 
J:GSA 
J:VT3 
JSVTT 

J:COL 
J:COM 
/ALL: 

j:pbs 
j:prm 
:pba: 

3I/AL 
PP/AL 
INIT/ 

:slic 
j:gsa 
J: INI 

J:COM 

DUAL/ 
J:DIS 
J: DAT 
J:dis 
J: VT4 
J:nr: 



arn/all:20. 

FRM/ALL:20. 

isp/all:20. 

EXT/ALL:20. 
EDT/ALL:20. 
VD1/ALL:20. 
20. SRC:(IC 
TOR/ALL:20. 
ERG/ALL:20. 
K/ALL:20. S 
L:20. SRC:( 
L:20. src:( 

ALL:20. SRC 
E/ALL:20. S 
TOL/ALL:20. 
TR1/ALL:20. 
MD2/ALL:20. 
ALL:20. SRC 
CMD/ALL:20. 
AR1/ALL:20. 
PAT/ALL:20. 
RIT/ALL:20. 
TBL/ALL:20. 



SR 

SR 
SR 
SR 
S« 
SR 

♦ :s 

SR 

SR 

RC: 

RJI 

opp 

: (I 
RC: 
SR 
SR 
SR 
:(J 
SR 
SR 
SR 
SR 
SR 



EC 



(P 



UA 



:(0A 

: (3S 

: wr 

: (VT 

:(C3 

: (CO 

T + G 

(PB 

(PB 

BAC 

SEC 

SEC 

T+C 

LIC 

(GS 

(IN 

(CO 

L + C 

(DI 

(DA 

(DI 

(VT 

( NiR 



TAR + C 
AFRM + 
DISP + 
TEXT* 
LEDT + 
MND1 + 
AML1B 
STOR + 
MERG + 
K + CSE 
T + GAM 
T + GAM 
SECT + 
E + CSE 
ATOL + 
ITRI + 
MND2 + 
SECT* 
SCMD + 
TARI + 
SPAT* 
4R1T + 
CTBL + 



SECT+GAML 

CSECT+GAM 

CSECT+GAM 

CSECT+GAM 

CSECT+GAM 

CSECT+GAM 

/LIB) 

CSECT+GAM 

CSECT+GAM 

CT+3AMLIB 

LIH/LIB) 

LIB/LIB) 

GAMLIB/LI 

CT+GAMLIB 

CSECT+GAM 

CSECT+GAM 

CSECT+GAM 

GAMLIB/LI 

CSECT+GAM 

CSECT+GAM 

CSECT+GAM 

CSECT+GAM 

CSECT+GAM 



IB/LIB) 

LIB/LIB) 

LIB/LIB) 

LIB/LIB) 

LIB/LIB) 

LIB/LIB) 

LI3/L1B) 
LIB/LIB) 
/LIB) 



B) 

/LIB) 

LIB/LIB) 

LIB/LIB) 

LIB/LIB) 

B) 

LIB/LIB) 

LIB/LIB) 

LIB/LIB) 

LI3/LIB) 

LIB/LIB) 
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• *****#♦**** BASIC SUPPORT **»**♦*♦*♦**♦♦♦♦*♦**** 
i 

MACR3/LIST:LST:GMBAS1/0BJ:GM3AS1/ALL:20. SRC: (F4BAS+RTFB+IOTBL+CSECT1) 

MACRO/LIST:LST:GMBAS2/OBJ:GMBAS2/ALL:20. SRC : (F4BAS2+CSECT1 ) 

MACR0/LIST:LST:GMBAS3/OBJ:GM9AS3/ALL:20. SRC: (PLOT + CSECT1 ) 

MACR3/LISr:LST:GAMCLI/OBJ:GAMCLI/ALL:20. SRC:3AMCLI 

*********** FORTRAN SUPPORT *»*******♦*****♦***♦ 

MACRO/LIST:LST:GMFORi/OBJ:GMF3Rl/ALL:20. SRC : ( F0RT+F4BAS+RTFB+IOTBL+CSECT1 ) 

MACR0/LI5T:LST:GMFOR2/0BJ:GMF3R2/ALL:20. SRC: ( FORT+F4BAS2+CSECT1 ) 

MACRO/LlST:LST:GMFOR3/OBJ:GMFOR3/ALL:20. SRC: C F0RT+PL3T+CSECT1 ) 

MACR3/LIST:LST:F4ADMN/OBJ:F4ADMN/ALL:20. SRC:(COLOR+F4ADM) 

MACR3/LIST:LST:F4RQOT/OBJ:F4R33T/ALL:20. SRC: COLOR +R30T+CSCT VI ) 

MACR3/LIST:LST:F4PLOT/OBJ:F4PL3T/ALL:20. SRC:(COLQR+PLOTV1+CSCTV1) 
I 

J **»#*♦*♦**♦*♦**** END ************************** 



************* GMASMS.CO'4 **♦******♦♦**♦***♦♦**♦* 



GAMMA-11 V2C VT01 DEPENDENT ASSEMBLIES 



*********** BGAMMA **»***#«*********♦****«♦***♦* 

MACRO/LIST: LST :GAMRMS/UB J :GAMR*!S SRC: (VTOl+GAMRUvi + GAMLlB/LIB) 
MACR0/LIST:LST:B3CMDS/OBJ:BGCMDS SRC: (Vi01+B3C3MD + 3A'-1 LIB/LIB) 



*********** DATA ANALYSIS *********♦♦♦****♦♦*** 



MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 
MACRO 



/LIST! 
/LIST: 
/LIST! 
/LIST! 
/LIST! 
/LIST! 
/LIST! 
/LIST! 
/LIST: 
/LIST! 
/LIST: 
/LIST: 
/LIST! 
/LIST! 
/LIST! 



LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 
LST 



DATARS/ 
MOIS/OB 
CMNOIS/ 
1CS/OBJ 
P3IS/OB 
PPPS/OB 
INITS/O 
SLICE/O 
INTRIS/ 
CM*D2S/ 
DUALS/O 
OSCMDS/ 
DSPATS/ 
VTrfRTS/ 
NRTBLS/ 



OBJ:OB 
j;3Bj: 

QBJ:OB 

:QBJ:I 
J: OBJ: 
J:DBJ: 

BJ:OBJ 
BJ:3BJ 
OBJ:OB 
0BJ:3B 

bj:obj 
obj:ob 

OBJ:OB 

obj:ob 

OBJ:OB 



J:DAT 
MDIS/ 
J:C^ 
CS/AL 
R3IS/ 
ORPS/ 

: init 
:sli: 
J: IVT 

J.'CMvj 
:OUAL 

j:ds; 
J:OSp 
J: VT/j 
J:nct 



ARS/A 
ALL:2 
OlS/A 
L:20. 
ALL:2 
ALL:2 
S/ALL 
ES/AL 
R1S/A 
D2S/A 
S/ALL 
MDS/A 
ATS/A 
RTS/A 
BLS/A 



LL:20. 
0. SRC 
LL:20. 
SRC: ( 
0. SRC 
0. SRC 
:20. S 
L:20. 
LL:20. 
LL:20. 
:20. S 
LL:20. 
LL:20. 
LL:20. 
LL:20. 



SRC: ( 

: (MDIS 

SRC:( 

vroi ♦ i 

: (VTOi 
: (PPP + 

RC: (VT 

SRC: (V 
SRC: ( 
SRC: ( 

RC: ( VT 

SRC: ( 
SRC:( 
SRC: ( 
SRC: ( 



VTOI + D 
+CSECT 

vroi+c 

C+CSEC 
♦R3I+C 
CSECT+ 

1 + 1 h 1 
TOl+SL 
VT01+1 

vroi+c 

01 + DUA 

v roi+n 
vroi+D 

VT01+V 
V T 1 ♦ N 



ATAR 
♦ 3AM 

3MNI) 

t+ga 

SECT 
GA«L 
T + CS 
ICE* 
MTR 
3MND 
L. + CS 
ISCM 
1SPA 

r^Ri 

RCTB 



+ CSE 
Lift/ 
1+CS 
*ILIB 
♦ GAM 
IB/L 
ECT + 
CSEC 

1 + CS 

2 + CS 
ECT + 
D + CS 
T + CS 
T + CS 
L + CS 



CT + GA 
LIB) 
ECT + G 
/LIB) 
LIB/L 
IB) 
3AMLI 
T + GAM 
ECT + G 
ECT + G 
3AMLI 
ECT + G 
ECT + G 
ECT + 3 
ECT + G 



•ML1B/LIB) 

AMLIB/LIB) 

IB) 

B/L1B) 

LIB/LIB) 

AMLIB/LIB) 

AMLIB/LIB) 

B/LIR) 

AMLIB/LIB) 

A1LIB/L1B) 

AMLIB/L'IB) 

AMLIB/LIB) 



*********** BASIC SUPPORT ♦****»♦♦♦**♦♦♦♦♦♦♦♦*** 

MACR0/LIST:LST:GMBVT1/0BJ:GM3AS1 ,3VT/ALL:20. SRC:( V TO 1 +E4BAS + RTEB+ IDTBL+CSEC Tl ) 
-M ACRO/LIST:LST:GM B VT2/UBJ:GM B AS2, JVT/ALL:20. SRC : (VT01+F 4 BAS2»CSECT1) - 



MACRO/LIST:LST:GMBVT3/OBJ:GMBAS3.3VT/ALL:20. 
MACRO/LIST: LS T : GAMC VT/OB J :GAMCLI. 3 VT/ ALL: 20. 



sr: 
sr: 



: cvtoi+pljt+cse: 
: ( vtoi+gamcli) 



Tl) 



*********** FORTRAN SUPPORT ♦♦***♦**********♦*** 

MACRO/LIST:LST:GMFVT1/OBJ:G^F3R1.3VT/ALL:20. SRC : ( V TO! + F JRT+F4BAS+RTFB+I0TBL+CSECT1 ) 

MACRO/LIST : LST : GMFVT2 /OB J :GMF3R2. DVT/ ALL: 20. SRC: ( VTOI +F3R r+K4BAS2+CSECTl ) 

MACRO/LIST:LST:GMFVT3/OBJ:GMF3R3.3VT/ALL:20. SRC : ( V TO 1 +F3RT + PL3T + CSECT1 ) 

MACRO/LI ST : LST : F4A0VT/0B J :F4A9V^.3VT/ ALL: 20. SRC:(VT01+F4ADM) 

MACRO/LIST:LST:F4RTVT/OBJ:F4RD3T.3VT/ALL:20. SRC: ( VTOI +R33T+CSCTV1 ) 

MACRO/LIST:LST:r4PLVT/OBJ:F4PL3T.3VT/ALL:20. SRC: ( V TO 1 +PL3TV 1 +CSC TV1 ) 
j 

J *************** * tNO ************************** 
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4.2 LINKING GAMMA-11 USING INDIRECT COMMAND FILES 

There are four indirect command files for linking GAMMA-11: 

GMLNKC.COM Display-independent links 

GMLNKV.COM VSVOl-dependent links 

GMLNKS.COM VTOl-dependent links 

GMLNKB.COM BASIC/RT-11 links (with GAMMA-11 subroutines) 

To link GAMMA-11 for the VSV01 color display, use indirect command 
files GMLNKC and GMLNKV. To link GAMMA-11 for the VT01 display 
storage scope use indirect command files GMLNKC and GMLNKS. 

These command files use four logical device assignments: 

OBJ for the object file device (LINK-11 input device) 

EXE for the .SAV and .REL files (LINK-11 output device) 

MAP for the link map device (LINK-11 map device) 

BAS for BASIC/RT-11 object files 

BAS is used only by GMLNKB.COM. 

Use the RT-11 ASSIGN command to assign physical devices to the logical 
devices. If you do not want output files or maps, assign the null 
device handler (NL) to EXE or MAP. 

For example, the following RT-11 commands would be used to link 
GAMMA-11 for the VSV01 display with the object files on RK05 drive 1, 
the .SAV and .REL files on RK05 drive 1, and no link map. 

.ASSIGN RK1 OBJ 
.ASSIGN RK1 EXE 
.ASSIGN NL MAP 
.@GMLNKC 
.@GMLNKV 



I 

•GAMMA-11 V2C DISPLAY INDEPENDENT LINKS 

i 

• 

i 

LINK/MAP: MAP ;DATTIM/WIDE/EXE: SAV : DATUM 3BJ: DATUM 

LINK/MAP: MAP : SYSSUM/ WIDE/EXE : SAV :SYSSUM 3BJ:SYSSUM 

LINK/MAP: MAP : DELETE/ WIDE/EXE: SAV: DELETE 3BJ: ( DELETE , INDEX) 

LINK/MAP: MAP : TRNFER/tflDE/EXE : SAV : TRNFER/ PROMPT - 

3BJ:TRMFER 

3BJ:GA*FIL/0:1 

3BJ:INDEX/0:1 

// 

link/map:map:datacq/wide/exe:data:q/prompt - 

33J:CBA:0CM,GAMDEV) 
3BJ:DYVACQ/0:1 

33j:st:aco,lstac3/u: 1 

3BJ:PAT^0N/o:2 

33J:BAC0SB/O:2 

3BJ:GAMFIL/0:2 

3SJ:BA:DST/0:3 

3BJ:PREDEF/0:3 

3BJ:badset/o:3 

3BJ:PADMIN/U:4 
3BJ:GS*ACQ,RWAVE/0:5 

// 
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link/map: map :fgamma/w i de/exe:sav:fgamma/prc1mpt/f3re 

33J:(Fa:qcm,gamdev) 

38j:DYYACQ/0:i 

3BJ:ST:ACQ/0:i 

33J:FLsrAoyo:i 

DSJ;FA:3SB/0:2 

33J:GA4FIL/0:2 

osj:FA:psr/o:3 

3BJ:PR£3EF/0:3 
38J:FA3SET/0:3 
33J:PA3^1IN/0:4 

// 

l i mk /map: map :egam^1a/wi ok/exe :sav:egamm a/prom? t/fjrfc: 

dbj:(ea:ocm,gamdev) 

D8J:ea:osb/0:i 

33J:GAMFIL/0:1 

38J:EA:3ST/0:2 

dbj:predef/o:2 

33J:EA3SET/0:2 

3BJ:ED*NAO/0:3 

33J:ESr:AQ/0:3 

3BJ:ELSTAQ,R*/AVE/3:3 

33J:PA3M1N,MEMMNG/C3:4 

// 

I 

1GAMMA-11 V2C VSV01 DEPENDENT LIMKS 

• 

LINK/MAP: MAPj : BGAMMA/ WIDE/EXE : SAV : BGAMMA/PROMPT - 

3bj: (gamrum,gamdev,memmng) 

3bj:bg:3md/o:i 

// 

LINK/MAP: MAP: DAT ANl/rf I DE/EXE:SAV:DATANL/PROMPT - 



33J 
3BJ 
3BJ 
3BJ 
33 J 
38J 
3BJ 
33J 
3BJ 
3BJ 
3BJ 
38J 
3BJ 
3BJ 
3BJ 
3BJ 
38J 
3BJ 
3BJ 
3BJ 
3BJ 
3BJ 
38 J 
3BJ 
3BJ 
3BJ 
3BJ 



DATARN 

FRMST1/0:1/C 

FRMST2/0:1/C 

GSAFRM/0:1/C 

VT31SP/OM/C 

VTTEXT/0:1/C 

COLEDT/0:l/C 

AD^IIN/OM/C 

COMNDl/0:l/C 

IC/3:l/C 

PB^ERG/Q:1/C 

PBSTOR/0:l/C 

pba:k/o:i/c 

roi/0:1/C 

FL33D/OM/C 

PPP/0:l/C 

IN3SX,INIT,DX/0:l/C 

ERR3R/OM/C 

CO*1MAC/0:l/C 

sli:e/o:i/c 

GSArOL/0:2/C 
FL3LV2/0:2/C 
INlTRI/0:2/C 
VMARK2/0:2/C 
PP?LV2/0:2/C 
ROILV2/0:2/C 
CCHMD2/0:2/C 
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38J:DUAL/0:2/C 

38j:dis:md/o:2/c 

3BJ:BUFSEr/0:2/C 

3BJ:DArARl/0;3/C 

3BJ:0ISPAT/0:i/C 

38J:J0*/0:3/C 

3BJ:VTWRlT/0:3/C 

3BJ:FPMPEX/0:3/C 

3BJ;NR:rBL/o:3/c 

3BJ:LlSr/0:3 

// 



•GAMMA-U V2C VT01 DEPENDENT LINKS 



link/map: map ! bgamm5. map/wxde/exe: sav: bgamma . m /prompt 

3bj:(gamrms,gamdev) 

3bjzbg:mds/o:i 

// 

LlNK/MAP:MAP:DATNLS.MAP/i«IIDE/EXE;SAV:DAT^LS/PR3MPr - 



3BJ 
3BJ 
3BJ 
3BJ 
3BJ 
3BJ 
3BJ 
38 J 
3BJ 
3BJ 
3BJ 
3BJ 
3BJ 
3BJ 
38 J 
3BJ 
3BJ 
3BJ 
3BJ 
38 J 
38J 
3BJ 
38J 
3BJ 
38 J 
3BJ 
3BJ 
3BJ 
38 J 
// 



DATARS 

FRv*sn/o:i/c 

FRMST2/0:1/C 

AD^IN/0:l/C 

CMV31S/0:l/C 

ICS/0:l/C 

ROIS/OM/C 

FL3JD/0J1/C 

PPPS/0:1/C 

IN3EX,INIT5,DX/U:l/C 

ERR3R/3:l/C 

ccmAC/o:i/c 
sli:es/o;i/c 

FL3LV2/OJ2/C 
INTRlS/0:2/C 
VMARK2/0:2/C 
PPPLV2/0:2/C 
ROIUV2/OJ2/C 
CM»32S/0:2/C 
DUAL.S/0:2/C 

ds:mds/o:2/c 

BUFSET/0:2/C 
DArRlS/0!3/C 
DSPATS/0:3/C 

joy/o:3/: 

VTrfRTS/U:3/C 
FPMPEX/0:3/C 

NRraLS/o:3/c 

LI SI/O: 3 
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t****** LINK VSV01 BASIC W/O EIS *♦*** 
i 



R LINK 



SAV 
3AS 
3BJ 
38 J 
3AS 
3AS 
BAS 
BAS 
3AS 
3AS 
3AS 
3 AS 
3AS 
BAS 
3AS 
3AS 
BAS 
3AS 
3AS 
3AS 
33J 
38J 
33 J 
3AS 
// 



BASIC, MAP:BASIC/W=/B:700// 

BSPrRS,BSPAT,BSROS 

GA^CLI 

GM3AS1 

BSTLLB 

SUI3PR 

SU31ID,BSOT0S,BSOriS/Q;l 

SUI3ID,SUI0P3,BSPR0,SUR1ID,BSR1S/Q:1 

SUXID,BSXOA,BSXOB/OJ2 

SUX2ID,BSX2/3:2 

SUEID,BSE0/0:2 

SUEUD,BSEl,3SSUB,BSRSQ/3:2 

SU0rCM/O:2 

BSERR,BSERML/3:2 

BSXlA/0:3 

BSXlB/0:3 

BSPRl/0:3 

bs:ls/o:3 

3S<EYS/0:3 

bs:mp/o:3 

GM3AS2/0:4 
GM3AS3/0:4 
GM3€RR/0:4 
SUIMP,6SFUNC,SUOPT/0:5 



i****** L1NK vsvoi BASIC WITH EIS ♦**** 
i 



SAV 
3AS 
38 J 
38 J 
3 AS 
3AS 
3AS 
3 AS 
3AS 
3AS 
3 AS 
3AS 
3 AS 
3AS 
BAS 
3AS 
BAS 
3AS 
3AS 
3 AS 
3BJ 
3BJ 
3BJ 
3 AS 
// 



basice,map:basice/W5/b:7qo// 
8sptrs,bspat,8sr0s 

GAMCLI 

GM3AS1 

BSCLLB 

SUI3PR 

SU31ID,BS0T0S.EIS,BS0T1S.EIS/0:1 

SUI31D,SUIOP3.,BSPRO,SUR1ID,BSR1S/U; 1 

SUXID,8SX0A,3SX0B/O:2 

SUX2ID,BSX2/3:2 

SUEID,BSE0/0:2 

SUilID,BSEl ,BSSUB,BSRSQ/3:2 

SUDrCM/0:2 

BSERR#BSERML/3:2 

BSXlA/0:3 

BSXlB/0:3 

BSPR1/OI3 

bs:ls/o:3 

BSKE*S/Q:3 

bs:mp/o:3 

GM3AS2/OM 
GM3AS3/OM 
GM3ERR/0:4 
SUI*P,BSFUNC,SUOPT/0:5 
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i 

•♦**♦♦♦ LINK VT01 BASIC W/O EIS ♦*♦♦* 
i 



B ASIC. VTl, HAP; BASICS/ Ws/B: 700// 

BSPrRS,BSPAT,BSROS 

GAMCLI.OVT 

GM3AS1.0VT 

8SCLLB 

SUI3PR 

SU31ID,BSOTOS,BSQT1$/O:l 

SUI3ID,SUIOP},BSPRO,SUR1ID,BSR1S/Q:l 

SUXID,BSX0A,BSX0B/O;2 

SUX2ID,BSX2/3:2 

SUEID,8SE0/0:2 

SU21ID,BSE1 ,3SSU8,BSRSQ/3;2 

SUDTCM/0:2 

BSERR#BSERML/3:2 

BSXlA/0:3 

BSXlB/0:3 

8SPRl/0:3 

bs:ls/j;3 

BSKEYS/Oji 

bs:mp/o;3 

GMBAS2.0VT/0:4 

GM8AS3.0VT/0:4 

GM3€RR/0:4 

SLUMP, BSFUNC,SUOPT/0:5 



SAV 
BAS 
OBJ 
3BJ 
3 AS 
3 AS 
3AS 
3 AS 
3AS 
3AS 
BAS 
3AS 
BAS 
BAS 
BAS 
3 AS 
8AS 
3 AS 
3 AS 
3AS 
3BJ 
3BJ 
3BJ 
3AS 
// 

I 
I 



3ASICE.VT1,MAP:BASCES/Ws/B:7 00// 

BSPrRS,BSPAT,BSROS 

GAMCLI.OVT 

GM3AS1.UVT 

BSCLLB 

SUI3PR 

SU31ID,BSOTOS.E1S,BSOT1S.EIS/3.:1 

SUI3ID,SUI0P3.,BSPR0,SURIID,BSR15/0: 1 

SUXID,8SX0A,3SX0B/O:2 

SUX2ID,BSX2/3:2 

SUSID,BSE0/O;2 

SUS1 ID,BSE1 ,3SSUB,BSRSQ/3:2 

SUDTCM/0:2 

BSERR,BSERML/0:2 

8SX1A/Q:3 

BSXlB/0:3 

8SPR1/OI3 

bs:ls/o:3 

BSKEYS/0;3 

BSCMP/0:3 

GMBAS2.0VT/0:4 

GM3AS3.0VT/0:4 

GM3ERR/OM 

SLUMP, BSFUNC,SUOPT/0:5 
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APPENDIX A 
BASIC/RT-11 LANGUAGE SUMMARY 



This appendix lists the BASIC/RT-11 commands, functions, statements, 
and error messages. For more detail, see the BASIC-11 Language 
Reference Manual (DEOll-LIBBB-A-D) and the BASIC-ll/RT-11 User's 
Guide (DEC-11-LIBUA-A-D) . 

For the differences between version IB and Version 2 of BASIC, see the 
BASIC-ll/RT-11 Installation Guide (DEC-11-LIBTA-A-D) . 



A.l BASIC/RT-11 STATEMENTS 

CALL routine name [[(argument list)]] 

Calls assembly language routines from a BASIC program. 



CHAIN string LINE expressionM 



Terminates execution of the program, loads the program specified 
by string, and begins execution at the lowest line number or at 
the line number specified by expression. The string is a file 
specification. 



CLOSE 



#]]exprl,ir#|lexpr2,[r#l]ex P r3, ... 



Closes the file(s) associated with the channel number (s) and 
virtual file channel number(s) specified. If no channel number 
is specified, closes all open files. 



COMMON list 



Preserves values and names of specified variables and arrays when 
the CHAIN statement is executed. Both string and arithmetic 
variables and arrays can be passed. The statement also 
dimensions the specified arrays. List is in the general format: 



varl |(exprfT,exprJ] )| ,var2 H(expr [Eexpr]])| 



DATA list 



Used in conjunction with READ to input listed data into an 
executing program. Can contain any mixture of strings and 
numbers. Items must be separated by commas. 
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DEF FNletter 
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(varl |Tvar2, . . . ,var5|] ) -expression 



Defines a user function. Letter may be any single letter A 
through Z. 



DIM list 



Reserves space in memory for arrays according to the subscript (s) 
specified after the variable name. List is in the general 
format: 



varl (expr ||,exprj] ) ,var2 (expr n^expr j] 



),... 



DIM # integerl , variable ( integer2 ,integer3 ) =integer4 

Dimensions the virtual array file associated with the channel 
number specified by integerl. Integer4 specifies the string size 
for string virtual arrays. 

END 

Optional. Placed at the physical end of the program to terminate 
execution. 

FOR var=exprl TO expr 2 [[STEP expr3j] 

Sets up a loop to be executed the specified number of times. 

GOSUB line number 

Unconditionally transfers control to specified line of 
subroutine. 

GO TO line number 

Unconditionally transfers control to specified line number. 

{THEN statement } 
THEN line number > 
GO TO line number) 

Conditionally executes the specified statement or transfers 
control to specified line number. When the condition is not true 
and a statement is specified, execution continues at the next 
sequential statement. The expressions and the relational 
operator must all be string or all be numeric. 



{THEN statement ) 
THEN line number > 
GO TO line number) 

Tests for end-of-file condition of input sequential 
associated with channel number specified by expression. 



file 
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INPUT pexprj variablel [£var iable2, . . .J 



Inputs data from your terminal or from the file associated with 
the channel number specified by expression. Variables may be 
arithmetic or string. 

KILL string 

Deletes file specified by string, 

LET variable=expression 

Assigns value of expression to the specified variable. Variable 
and expression must be of the same type, either numeric or 
string. 

LINPUT pexpr Jj string varlfTstring var2,.,rf] 

Inputs string data from the terminal or from the file associated 
with channel number specified by expression. Variables can only 
be string variables. 

NAME stringl TO string2 

Renames file specified by stringl to name specified by string2. 

NEXT variable 

Placed at end of FOR loop to return control to FOR statement. 

ON expression GOSUB line numberl jLline number2,line number3,... 

Conditionally transfers control to subroutine at one line number 
specified in list. Value of expression determines the line 
number to which control is transferred. 

ON expression GO TO line numberl fTline number2,line number3, . . .|j 

Conditionally transfers control to one line number in the list. 
Value of expression determines the line number to which control 
is transferred. 

ON expression THEN line numberl (Uline number2,...~j| 
Equivalent to ON GO TO. 



OPEN string 



(FOR INPUT ) 
(FOR OUTPUT) 



AS FILEf[#j|exprlHDOUBLE BUFM IT, RECORDS IZE expr2fj N^MODE expr3[j IT, FILE SIZE expr4| 



Opens a file specified by string for input or output as specified 
(assumes input if neither specified) and associates file with the 
channel number specified by exprl. String is a file 
specification. 



A- 3 



BASIC/RT-11 LANGUAGE SUMMARY 



OVERLAY string IjLINE expression]] 



Overlays or merges the program currently in memory with the 
program in the file specified by string, and when overlay is 
completed, transfers control to either the next sequential BASIC 
line number or the line number specified by expression. String 
is a file specification. 



PRINT |[#expr J [list]] 



Prints items in list on the terminal or to the file associated 
with channel number specified by expression. List can consist of 
string and arithmetic expressions and the TAB function. Items 
can be separated by either commas or semicolons. 



PRINT pexpr^j USING string, list 



Prints items in list on the terminal or to the file associated 
with channel number specified by expr in the format determined by 
string. List can consist of string and arithmetic expressions. 
Items can be separated by either commas or semicolons. 



RANDOMIZE 



Causes the random number generator (RND function) to produce 
different random numbers. 



|],variable2,. . .J 



READ variablel N,variable2 

Assigns values listed in DATA statements to specified variables. 
Variables may be string or numeric. 

REM comment 

No effect on execution of program. Contains explanatory comments 
about the BASIC program. 

RESET[[#exprT] 

Eauivalent to RESTORE. 



RESTORE 



[J#expr|] 



Resets either the data pointer or , when specified, the input file 
associated with the specified channel number to the beginning. 



RETURN 



STOP 



Terminates a subroutine and returns control to the statement 
following the last executed GOSUB statement. 



Terminates execution of the program. Placed at logical end(s) of 
the program. 
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A. 2 SUMMARY OF BASIC/RT-11 FUNCTIONS 
Arithmetic Functions 

ABS(expr) 

Returns the absolute value of the expression. 

ATN(expr) 

Returns the arctangent of the expression as an angle in radians 
in the range + or - pi/2. 

COS(expr) 

Returns the cosine of the angle specified by the expression in 
radians. 

EXP(expr) 

Returns the value of e raised to the power (expr) where e is 
(approximately) 2.71828. 

INT(expr) 

Returns the greatest integer less than or equal to the expression 
(expr) . (Truncation of decimal values.) 

LOG (expr) 

Returns the natural logarithm of the expression (expr). 

LOGlO(expr) 

Returns the base 10 logarithm of the expression (expr). 

PI 

Returns the value of pi (3.141593). 

RND|T(exprf|] 

Returns a random number between and 1. 

SGN(expr) 

Returns a value indicating the sign of expression (expr) . 

SIN(expr) 

Returns the sine of the angle specified by expression (expr) in 
radians. 
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SQR(expr) 

Returns the square root of the expression (expr) . 

TAB(expr) 

Causes the terminal to tab to column number specified by the 
expression (expr) (valid only in PRINT statements) . 

String Functions 

ASC (string) 

Returns as a decimal number the 8-bit internal code (ASCII value) 
for the 1-character string expression (string) . 

BIN(string) 

Converts a string expression (string) containing a binary number 
to a decimal value. Blanks are ignored. 

CHR$(expr) 

Generates a 1 ■'-character string whose ASCII value is the low-order 
8 bits of the integer value of the expression (expr). 



CLK$ 



DAT? 



Returns the time as a string in the form hh:mm:ss (for example 
12:30:15). 



Returns the date as a string in the form dd-mon-yr (for example 
07-FEB-75). 



LEN( string) 

Returns the number of characters in the string (string) . 

OCT (string) 

Converts a string expression (string) containing an octal number 
to a decimal value. Blanks are ignored. 

POS (string!, string2 ,expr ) 

Searches for and returns the position of the first occurrence of 
string2 in stringl. The search starts at the character position 
specified by expression (expr) . 
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SEG$ (string, exprl,expr2) 

Returns the string of characters in position specified by 
expressionl through the position specified by expression2. 

STR$(expr) 

Returns the string which represents the numeric value of the 
expression. 

TRM$ (string) 

Returns string without trailing blanks. 

VAL(string) 

Returns the value of the decimal number contained in the string. 



System Functions 

ABORT (expr) 

Deletes the program and changes the program name to NONAME if the 
expression is equal to 1. The ABORT function is equivalent to an 
END statement if the expression is equal to 0. 

CTRLC 

Enables the BASIC program to be interrupted with a CTRL/C. 



RCTRLC 



Disables the CTRL/C interrupt. While the RCTRLC function is in 
effect, the BASIC program cannot be interrupted. 

RCTRLO 

Ensures that BASIC program output is printed even if a CTRL/O is 
in effect. 

SYS(exprl[,expr2] ) 

Performs system dependent functions determined by exprl and 
expr2. See the BASIC-ll/RT-11 User's Guide (DEC-11-LIBTA-A-D) . 

TTYSET (255%, expr) 

Specifies the right margin of the terminal as the value of 
expr-1. If expr equals 0, BASIC does not change the previous 
margin. 
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A. 3 SUMMARY OF BASIC/RT-11 COMMANDS 

APPEND Ijf ile specification! 

Merges the program in your area in memory with the program 
specified by the file specification. 

CLEAR 

Initializes all variables to and all string variables to nulls 
and deletes arrays. 

COMPILE yfile specification! 

Saves a compiled version of the program. 

DEL line specif ication [Uline specif ication, .. .71 
Deletes specified lines. 



LENGTH 



Prints on your terminal the size of the program in memory and the 
size of the remaining free memory. 



LIST NH line specif icationl , line specif ication2 , .. .11 



Prints on the terminal the specified line(s) of the program 
currently in memory. NH suppresses the printing of the header 
line and is optional. 



NEW fjprogram namelj 



Erases your storage area and sets the current program name to the 
one specified. 

OLD [[file specification]] 

Erases your storage area and inputs the program from the 
specified file. 

RENAME program name 

Changes the current program name to the one specified, 

REPLACE |file specification]] 

Replaces the specified file with the current program. 

RESEQ [Tnew line number] , Mold line number l| [[-old line number2J , [liner ementj] 
Resequences program as specified. 
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RUN 



H 



Executes the program in memory. NH suppresses the printing of 
the header line and is optional. 



RUNl|]NH]]file specification 



Erases your storage area, inputs the program from the specified 
file, and then executes the program. Does not print header line 
in any case. 

SAVE [[file specification]] 

Outputs the program in memory to the specified file, 

SCR 

Erases your storage area and changes the program name to NONAME . 



SUB line numberxstr inglxstr ing2 uxintegerjl 



Substitutes the integer occurrence of stringl with string2 on 
line specified. x is a delimiter and can be any character such 
as @. 



UNSAVE file specification 

Deletes specified file. 



Key Commands 



CTRL/C 



Interrupts execution of a command or program and causes BASIC to 
print the READY message. See your BASIC-11 User's Guide for more 
information about CTRL/C. 

CTRL/0 

Causes all further terminal output to be discarded. Printing 
resumes if an INPUT statement is encountered, another CTRL/0 is 
typed, or the program is terminated. 

CTRL/Q 

Continues output to the terminal; cancels effect of CTRL/S . 



CTRL/S 



Temporarily suspends all output to terminal until CTRL/Q is 
typed; allows alphanumeric display terminals to be read or 
photographed before data is moved off screen. 
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CTRL/U 



Deletes the entire current input line (provided the RETURN key 
has not been typed) . 

DELETE 

Deletes the last character typed. 



A. 4 BASIC/RT-11 ERROR MESSAGES 

? ARGUMENT ERROR (?ARG) 

Arguments in a function do not match the arguments defined for 

the function, in number, range, or type. Ensure that there are 

the correct number of arguments, that their values are in the 
correct range, and that they are the correct type. 

? ARRAYS TOO LARGE (?ATL) 

Not enough memory is available for the arrays specified in the 
DIM statements. Reduce the size of the arrays or reduce the size 
of the program. 

?BAD DATA READ (?BDR) 

Data item input from a DATA statement or from a file is the wrong 
data type. Ensure that the DATA statement or the file contains 
the same data type as specified in the READ or INPUT # statement. 

?BAD DATA - RETYPE FROM ERROR (?BRT) 

Nonfatal. Item entered in response to an INPUT or INPUT #0 
statement is the wrong data type. Retype item and program will 
continue. 

?BAD LOG (?BLG) 

Nonfatal. Expression in LOG or LOG10 function is or negative. 
The function returns and BASIC continues execution of the 
program. 

7BUFFER STORAGE OVERFLOW (?BSO) 

Not enough room available for file buffer in your area. Reduce 
program size. 

7CHANNEL ALREADY OPEN (?CAO) 

OPEN statement specifies a channel that is already associated 
with an open file. Ensure that OPEN statements specify correct 
channel numbers and that files that should be closed are closed. 
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7CHANNEL I/O ERROR (?CIE) 

Accessing data in a file produces an error. Ensure that your 
peripheral devices and their storage media are working correctly. 
One possible cause is that the file accessed has length. 

7CHANNEL NOT OPEN (?CNO) 

A PRINT #, PRINT # USING, INPUT #, IF END #, or CLOSE statement, 
or a reference to a virtual array file specifies a channel number 
not associated with an open file. Check that the OPEN statement 
has been executed and that it specifies the same channel number 
as the program line with the error. 

7CHECKSUM ERROR IN COMPILED PROGRAM (?CCP) 

File produced by the COMPILE command contains a format error. 
Use a copy of the program created by a SAVE or REPLACE command. 

7C0MM0N OUT OF ORDER (?COO) 

Variables and arrays in a COMMON statement are not listed in the 
same order as those in a previous segment. Ensure that all 
segments have equivalent COMMON statements. 

7C0NTR0L VARIABLE OUT OF RANGE (?CVO) 

Expression in an ON GOTO or ON GOSUB statement is or negative 
or has a value greater than the number of line numbers listed. 
Ensure that expression has a value in the correct range. 

7DIVISI0N BY ZERO (7DV0) 

Nonfatal. An expression includes a division by 0. BASIC 
substitutes a value of for that operation and continues 
execution of the program. 

?END NOT LAST (7ENL) 

END statement is not the highest numbered program line. This 

error message is printed when the END statement is executed. 

Ensure that there is only one END statement in program and that 
it has the highest line number. 

7EXCESS INPUT IGNORED (?EII) 

Nonfatal. There are more data items than required by an INPUT or 
INPUT #0 statement. BASIC ignores the excess items and continues 
execution of the program. Ensure that data items did not contain 
an unintended comma (e.g., 1,430 instead of 1.430). 

7EXPONENTIATION ERROR (?ERR) 

Nonfatal. An expression includes the operation of raising a 
negative value to a nonintegral power (e.g., (-1)~.5). This 
would produce a complex number, which cannot be represented in 
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BASIC. This message is also produced when a negative value is 
raised to an integral value that has an absolute value greater 
than 255 (e.g., (-1)~256). In both cases, BASIC substitutes a 
value of for the operation and continues execution. 

7EXPRESSI0N TOO COMPLEX (?ETC) 

An expression is too complex for BASIC to evaluate in the area it 
uses for calculations (called the stack) . This condition is 
usually caused by including user-defined functions or nested 
functions in an expression. The degree of complexity that causes 
this error varies according to the amount of space available in 
the stack at the time. Breaking the statement up into several 
statements containing simpler expressions may eliminate the 
error . 

?FILE NOT FOUND (?FNF) 

BASIC cannot find the specified file. Ensure that the file 
specification was typed correctly and that the file exists. 

7FILE TOO SHORT (?FTS) 

The file is too small to contain the output. If the error occurs 

in a data file, specify a larger FILESIZE. If the error occurs 

in a program file, delete unused files with the UNSAVE command 
and then retry. 

7FLOATING OVERFLOW (?FOV) 

Nonfatal. The absolute value of the result of a computation is 
greater than the largest number that can be stored by BASIC 
(approximately 10"38) . BASIC substitutes a value of for the 
operation and continues execution of the program. 

7FL0ATING UNDERFLOW (?FUN) 

Nonfatal. The absolute value of the result of a computation is 
smaller than the smallest number that BASIC can store 
(approximately 10" (-38) . BASIC substitutes a value of for 
operation and continues execution of the program. 

?FOR WITHOUT NEXT (?FWN) 

The program contains a FOR statement without a corresponding NEXT 
statement to terminate the loop. Ensure that each loop in the 
program is terminated with a NEXT statement. 

7FUNCTION ALREADY DEFINED (?FAD) 

The user-defined function is previously defined. Ensure that 
each function is defined only once and has a unique name. 
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7ILLEGAL CHANNEL NUMBER (?ICN) 

The channel specified is not in the range allowed or the IF END 
statement specifies a file on a terminal. See your BASIC-11 
user's guide for information about the range of valid channel 
numbers. 

7ILLEGAL DIM (?IDM) 

A subscript in a DIM or COMMON statement is not an integer, an 
array is dimensioned more than once, or an array has more than 
two dimensions. Ensure that an array specification is in the 
correct format and appears only once in the COMMON and DIM 
statements in the program. 

7ILLEGAL END OF FILE IN COMPILED PROGRAM (?IEF) 

File produced by the COMPILE command contains a format error. 
Use a copy of the program created by a SAVE or REPLACE command. 

7ILLEGAL FILE LENGTH (7IFL) 

The FILESIZE specified was less than -1. 

7ILLEGAL FILE SPECIFICATION (?IFS) 

The file specification is invalid. See your BASIC-11 user's 
guide for information on the format of a file specification. 

7ILLEGAL IN IMMEDIATE MODE (?IIM) 

The INPUT or INPUT # statement cannot be entered in immediate 
mode. Enter the statement in a program line (followed with a 
STOP statement) and execute the statement with an immediate mode 
GO TO statement. 

7ILLEGAL I/O DIRECTION (?IID) 

Statement attempts to write to an input file or read an output 
file. Ensure that the channel number specified specifies the 
correct file. If the statement assigns a value to an element of 
a virtual array file, ensure that the file's OPEN statement does 
not specify "FOR INPUT." 

7INCONSISTENT NUMBER OF SUBSCRIPTS (PINS) 

The array is dimensioned with one subscript and referenced by 
two, or vice versa. Ensure that the DIM statement and array 
references are consistent. 

7INPUT STRING ERROR (7ISE) 

Nonfatal. A string entered in response to an INPUT statement 
begins with a quotation mark but is not terminated by the 
appropriate end quotation mark. BASIC assigns to the string all 
the characters between the initial quote and the line terminator 
and continues execution of the program. 
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?INTEGER OVERFLOW (?IOV) 

An integer variable is assigned a value greater than 32767 or 
less than -32768 or an integer expression produces a result which 
exceeds this range. Change the variable or expression to a 
floating point format. 

?LINE TOO LONG (?LTL) 

The line entered is longer than BASIC allows; the line is 
ignored. If this message occurs when BASIC is reading a program 
from a file, BASIC stops reading the file. A possible cause is 
that you entered a line near the maximum size with no spaces, but 
when you save the program, BASIC adds spaces making the line too 
long. Split the line into several smaller lines. 

?LINE TOO LONG TO TRANSLATE (?TLT) 

Lines are translated as they are entered; the line just entered 
exceeds the area reserved for translating. The line is ignored. 
If this message is produced while BASIC is reading a program from 
a file, BASIC stops reading the file. Split the line into 
several smaller lines. 



7MISSING SUBPROGRAM (?MSP) 

The CALL statement specifies a nonexistent routine name. Ensure 
that the name is typed correctly (it must consist of upper case 
letters) . 

?NEGATIVE SQUARE ROOT (?NGS) 

Nonfatal. The expression in the SQR (square root) function has a 
negative value. The function returns a value of 0. BASIC 
continues execution of the program. 

?NESTED FOR STATEMENTS WITH SAME CONTROL VARIABLE (?FSV) 

A FOR statement specifies the same control variable as that 
specified by a FOR NEXT loop that the FOR statement is inside. 
Change one of the control variables to a different variable name 
(in both the FOR and the corresponding NEXT statement). 

7NEXT WITHOUT FOR (?NWF) 

A NEXT statement is without a corresponding FOR statement. 
Ensure that each loop starts with a FOR statement and ends with a 
NEXT statement which specifies the same variable. This error 
message is also produced if control is transferred into the 
middle of a loop. FOR NEXT loops should only be entered by 
executing the FOR statement. 
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?NOT ENOUGH ROOM (?NER) 

There is not enough room for the FILESIZE specified. Delete 
unused files with the UNSAVE command. 

7NUMBERS AND STRINGS (?NSM) 

String and numeric values appear in the same expression or they 
are set equal to each other; for example, A$=2. Change either 
the data type of the variable (e.g., A=2) or the expression 
(e.g., A$="2") so that they are consistent. 

?OUT OF DATA (?00D) 

The data list is exhausted and a READ statement requests 
additional data or the end of a file is reached and the INPUT # 
statement requests additional data. Ensure that there is 
sufficient data or test for the end-of-file condition with the IF 
END statement. 

PPRINT USING ERROR (?PRU) 

There is an error in the PRINT USING statement caused when the 
format specification is not a valid string, or is null, or does 
not contain one valid field. The error is also caused when an 
attempt is made to print a numeric value in a string field, a 
string value in a numeric field, or a negative number in a 
floating asterisk or floating dollar sign field that does not 
also specify a trailing minus sign. The message is also printed 
if the items in the list are not separated by commas or 
semicolons. 

7PROGRAM TOO BIG (?PTB) 

The line just entered causes the program to exceed the user area 
in memory; the line is ignored. Reduce program size. If this 
error occurs when BASIC is reading a program from a file, BASIC 
stops reading the file. 

7RESEQUENCE ERROR (?RES) 

Resequencing the program would cause lines to overlap or existing 
lines to be deleted, or would create an illegal line number. 
Reenter the command with different arguments. 

7RETURN WITHOUT GOSUB (?RWG) 

A RETURN is encountered before execution of a GOSUB statement. 
Do not transfer control to a subroutine except by executing a 
GOSUB or an ON GOSUB statement. 

7STRING STORAGE OVERFLOW (?SSO) 

Not enough memory is available to store all the strings used in 
the program. Reduce program size. 
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7STRING TOO LONG (?STL) 

The maximum length of a string in a BASIC statement is 255 
characters. Split string into several smaller strings. 

7SUBSCRIPT OUT OF BOUNDS (?SOB) 

The subscript computed is less than zero or is outside the bounds 
defined in the DIM statement. Ensure that expression specifying 
the subscript is in the correct range. 

7SUBSTITUTE ERROR (?SUB) 

There was no separator between the strings in the SUB command or 
the command would create an immediate mode statement. Retype SUB 
command. 



7SYNTAX ERROR (?SYN) 

BASIC has encountered an unrecognizable element. Common examples 
of syntax errors are misspelled commands, unmatched parentheses, 
and other typographical errors. This message can also be 
produced by attempting to read in a program from a file 
containing illegal characters, in which case BASIC stops reading 
the file. Retype program line or ensure that file contains a 
valid BASIC program. 

?TOO MANY GOSUBS (?TMG) 

More than 20 GOSUBS have been executed without a corresponding 
RETURN statement. Change the program logic so that less GOSUB 
statements are executed. 

?TOO MANY ITEMS IN COMMON (?TIC) 

There are more than 255 variable and array names in COMMON (A, 
A(100), A%, A%(10, 10), A$, and A$(5) are all considered 
different names) . Reduce the number of items in COMMON by 
converting individual variables to elements of an array or by 
passing fewer items to the next program segment. 

7UNDEFINED FUNCTIONS (?UFN) 

A user-defined function has been used and not defined. Define 
the function. A function is defined only after the RUN command 
or CHAIN statement is executed. 

7UNDEFINED LINE NUMBER (?ULN) 

The line number specified in an IF, GO TO, GOSUB, ON GO TO, ON 
GOSUB, or CHAIN statement does not exist anywhere in the program. 
Ensure that the line number specified exists in the program. 
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7UNDIMENSI0NED ARRAY IN CALL (?UAC) 

The first reference to an undimensioned array appears in a CALL 
statement. Dimension the array with the DIM statement. 

?USE REPLACE 

Saving the program would have caused an existing file to be 
deleted. Use either a different file specification or the 
REPLACE command. 



7VIRTUAL ARRAY CHANNEL ALREADY IN USE (?VCU) 

The DIM # statement specifies a channel number which has already 
appeared in a DIM # statement. Specify another channel number. 



Function Error Messages 

Using BASIC functions improperly causes error messages to be printed. 
The following list names the functions and describes under which 
conditions BASIC functions produce errors. 



All functions 

The argument used is the wrong type. For example, the argument 
is numeric and the function expects a string expression. This 
condition produces 7ARGUMENT ERROR (?ARG) . 

All functions 

The wrong number of arguments is used in a function, or the wrong 
character is used to separate them. For example, PRINT SIN (X,Y) 
produces a syntax error because the SIN function has only one 
argument. This condition produces 7SYNTAX ERROR (7SYN) . 

ASC(string) 

String is hot a 1-character string. This condition produces 
7ARGUMENT ERROR (7ARG) . 

BIN(string) 

Character other than blank, 0, or 1 in string or value is greater 
than 2"16. This condition produces 7ARGUMENT ERROR (?ARG) . 

CHR$(expr) 

Expression is not in the range to 32767. This condition 
produces 7ARGUMENT ERROR (7ARG) . 
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EXP(expr) 



Value of expression is greater than 87, This condition produces 
7EXPONENTIATION ERROR (?EER) . 



FNletter 



The function FNletter is not defined (function cannot be defined 
by an immediate mode statement) , This condition produces 
7UNDEFINED FUNCTION (?UFN). 



LOG(expr) 



Expression is negative or 0, The function returns a value of 0. 
This condition produces ?BAD LOG (?BLG) . 



LOGIC (expr) 



Expression is negative or 0. The function returns a value of 0. 
This condition produces ?BAD LOG (?BLG) . 



OCT(string) 



Character other than blank or digits through 7 appears in 
string, or value is greater than 2"16, These conditions produce 
ARGUMENT ERROR (?ARG) . 



PI 



An argument is included. This condition produces 7SYNTAX ERROR 
(?SYN) . 

SEG$ (string , expr 1 , expr 2) 

No additional error conditions. 

SQR(expr) 

Expression is negative. The function returns a value of 0. This 
condition produces ?NEGATIVE SQUARE ROOT (?NGS) . 

TAB (expr ) 

Expression is not in the range to 32767. This condition 
produces 7ARGUMENT ERROR (?ARG) . 

VAL (string) 

String is not a numeric constant. This condition produces 
7ARGUMENT ERROR (?ARG) . 
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B.l EXPRESSION OPERATORS 

Operators in each type are shown in order of descending precedence. 



Type 


Operator 


Operates Upon 


Arithmetic 


** 


exponentiation 


arithmetic or logical 




*,/ 


multiplication, 


constants, 






division 


variables, and 




+ ,- 


addition, subtraction 
unary plus and minus 


expressions 


Relational 


.GT. 


greater than 


arithmetic or logical 




.GE, 


greater than or equal to 


constants, variables, 
and expressions 




.LT. 


less than 


(all 




.LE. 


less than or equal to 


relational operators 
have equal priority) 




.EQ. 


equal to 






.NE. 


not equal to 




Logical 


. NOT . 


.NOT. A is true if and 


logical or integer 






only if A is false 


constants, variables, 
and expressions 




.AND. 


A.AND.B is true if 
and only if A and B 
are both true 






.OR. 


A.OR.B is true if and 
only if either A or 
B or both are true 






.EQV. 


A.EQV.B is true if and 


(precedence same 






only if A and B 


as .XOR.) 






are both true or A 








and B are both false 






.XOR. 


A.XOR.B is true if and 


(precedence same 






only if A is true and 


as .EQV.) 






B is false or B is 








true and A is false 
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B.2 STATEMENTS 



The following summary of statements available in the PDP-11 FORTRAN 

language defines the general format for the statement. If more 

detailed information is needed, refer to the PDP-11 FORTRAN Language 

Reference Manual (DEC-11-LFLRA-C-DN1) . ~"~ 

Statement Formats Effect 

ACCEPT See READ, Formatted Sequential 
See READ, List-Directed 

Arithmetic/Logical Assignment 
v=e 

v is a variable name or an array element name. 

e is an expression. 

The value of the arithmetic or logical expression is 
assigned to the variable. 

Arithmetic Statement Function 
f([p[#p]...])-e 

f is a symbolic name. 

p is a symbolic name. 

e is an expression. 

Creates a user-defined function having the variables p 
as dummy arguments. When referenced, the expression is 
evaluated using the actual arguments in the function 
call. 

ASSIGN s TO v 

s is an executable statement label. 

v is an integer variable name. 

Associate the statement number s with the integer 
variable v for later use in an assigned GO TO 
statement. 

BACKSPACE u 

u is an integer variable or constant. 

The currently open file on logical unit u is backspaced 
one record. 
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BLOCK DATA [nam] 

nam is a symbolic name. 

Specifies the subprogram which follows as a BLOCK DATA 
subprogram. 

CALL s[([a] [, [a]] ...)] 

s is a subprogram name. 

a is an expression, a procedure name, or an array name. 

Calls the SUBROUTINE subprogram with the name specified 
by s, passing the actual arguments a to replace the 
dummy arguments in the SUBROUTINE definition. 

CLOSE (p[,p] ...) 

p is one of the following forms: 

UNIT =e 

DISPOSE = 'SAVE' or DISP - 'SAVE' 

DISPOSE = 'KEEP' or DISP = 'KEEP' 

DISPOSE * 'DELETE' or DISP = 'DELETE' 

DISPOSE = 'PRINT' or DISP = 'PRINT' 
ERR = s 

e is a numeric expression. 

s is an executable statement label. 

Closes the specified file. 

COMMON [/[cb]/] nlist [[ ,]/[cb] /nlist] .. . 

cb is a common block name. 

nlist is a list of one or more variable names, array names, or 
array declarators separated by commas. 

Reserves one or more blocks of storage space under the 
name specified to contain the variables associated with 
that block name. 



CONTINUE 



Causes no processing. 



DATA nlist/clist/[ [ ,] nlist/clist/] . . . 

nlist is a list of one or more variable names, array names, or 
array element names separated by commas. Subscript 
expressions must be constant. 

clist is a list of one or more constants separated by commas, 
each optionally preceded by j*, where j is a nonzero, 
unsigned integer constant. 
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Causes elements in the list of values to be initially 
stored in the corresponding elements of the list of 
variable names. 

DECODE (C,f ,b[,ERR=s]) [list] 

c is an integer expression. 

f is a FORMAT statement label or array name. 

b is a variable name, array name, or array element name. 

s is an executable statement label. 

list is an I/O list. 

Changes the elements in the I/O list from character 
into internal format; c specifies the number of 
characters, f specifies the format, and b is the name 
of the entity containing the characters to be 
converted. 

DEFINE FILE u (m,n ,U , v) [ , u (m, n ,U , v) ] . . . 

u is an integer variable name or integer constant. 

m is an integer variable name or integer constant. 

n is an integer variable name or integer constant. 

v is an integer variable name. 

Defines the record structure of a direct access file 
where u is the logical unit number, m is the number of 
fixed length records in the file, n is the length in 
words of a single record, U is a fixed argument, and v 
is the associated variable. 

DIMENSION a (d) [, a (d) ].. . 

a(d) is an array declarator. 

Specifies storage space requirements for arrays. 

DO s [ ,] i = el,e2[,e3] 

s is the label of an executable statement, 
i is a variable name, 
ei are integer expressions. 
To execute the DO loop: 

1. Set i = el 

2. Execute statements through statement number s 

3. Evaluate i = i+e3 
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4. Repeat 2 through 3 for 

MAX (1, INT((e2 - el)/e3) + 1) 
iterations 

ENCODE (c,f ,b[,ERR=s]) [listj 

c is an integer expression. 

f is a FORMAT statement label or an array name. 

b is a variable name, array name, or array element name. 

s is an executable statement label. 

list is an I/O list. 

Changes the elements in the list of variables into 
characters; c specifies the number of characters in 
the buffer, f specifies the format statement number, 
and b is the name of the entity to be used as a buffer. 



END 



Delimits a program unit. 



END FILE u 

u is an integer variable or constant. 

An end-file record is written on logical unit u. 

END=S,ERR=s 

s is an executable statement label. 

(Transfer of Control) on end-of-file or error condition 
is an optional element in each type of I/O statement 
allowing the program to transfer to statement number s 
on an end-of-file (END=) or error (ERR=) condition. 

EQUIVALENCE (nlist) [ , (nlist) ] . . . 

nlist is a list of two or more variable names, array names, or 
array element names separated by commas. Subscript 
expressions must be constant. 

Each of the names (nlist) within a set of parentheses 
is assigned the same storage location. 

EXTERNAL v[,v] ... 

v is a subprogram name. 

Defines the names specified as FUNCTION or SUBROUTINE 
subprograms. 
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FIND (u'r) 

u is an integer variable name or integer constant. 

r is an integer expression. 

Positions the file on logical unit u to record r and 
sets associated variable to record number r. 

FORMAT (field specification,...) 

Describes the format in which one or more records are 
to be transmitted; a statement label must be present. 

[typ] FUNCTION nam[*n] [ ( [p[,p] ...] ) ] 

typ is a data type specifier. 

nam is a symbolic name. 

*n is a data type length specifier. 

p is a symbolic name. 

Begins a FUNCTION subprogram, indicating the program 
name and any dummy argument names, p. An optional type 
specification can be included. 

GO TO s 

s is an executable statement label. 

(Unconditional GO TO) Transfers control to statement 
number s. 

GO TO (slist) [ ,] e 

slist is a list of one or more executable statement labels 
separated by commas. 

e is an integer expression. 

(Computed GO TO) Transfers control to the statement 
label specified by the value of expression e. (If e=l 
control transfers to the first statement label. If e=2 
it transfers to the second statement label, etc.) If e 
is less than 1 or greater than the number of statement 
labels present, no transfer takes place. 

GO TO v [ [,] (slist) ] 

v is an integer variable name. 

slist is a list of one or more executable statement labels 
separated by commas. 

(Assigned GO TO) Transfers control to the statement 
most recently associated with v by an ASSIGN statement. 
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IF (e) sl,s2,s3 

e is an expression. 

si are executable statement labels. 

(Arithmetic IF) Transfers control to statement number 
si depending upon the value of the expression. If the 
value of the expression is less than zero, transfer to 
si; if the value of the expression is equal to zero, 
transfer to s2; if the value of the expression is 
greater than zero, transfer to s3. 

IF (e) st 

e is an expression. 

st is any executable statement except a DO or logical IF 
statement. 

(Logical IF) Executes the statement if the logical 
expression is true. 

IMPLICIT typ (a[,a] ...) [,typ(a[,a] . ..)] ... 

typ is a data type specifier. 

a is either a single letter, or two letters in alphabetical 
order separated by a dash (i.e., x-y) . 

The elements a represent single (or a range of) 
letter (s) whose presence as the initial letter of a 
variable specifies the variable to be of that type. 

OPEN (p[,p]...) 

p is one of the following forms: 

UNIT = e 

NAME = n 

TYPE = 'OLD 1 

TYPE = 'NEW 

TYPE = 'SCRATCH' 

TYPE = 'UNKNOWN' 

ACCESS = 'SEQUENTIAL' 

ACCESS = 'DIRECT' 

ACCESS = 'APPEND' 

READONLY 

FORM = 'FORMATTED' 

FORM = 'UNFORMATTED' 

RECORDSIZE = e 

ERR = S 

BUFFERCOUNT = e 

INITIALSIZE = e 

EXTENDSIZE = e 

NOSPANBLOCKS 

SHARED 

DISPOSE = 'SAVE' or DISP = 'SAVE' 

DISPOSE = 'KEEP' or DISP = 'KEEP' 

DISPOSE = 'DELETE' or DISP = 'DELETE' 

DISPOSE = 'PRINT' or DISP = 'PRINT' 
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ASSOCIATEVARIABLE ■ V 
CARRIAGECONTROL = 'FORTRAN' 
CARRIAGECONTROL = 'LIST' 
CARRIAGECONTROL = 'NONE' 
MAXREC = e 
BLOCKSIZE = e 

e is an integer expression. 

s is an executable statement label. 

v is an integer variable name. 

n is an array name, variable name, array element name, or 

alphanumeric literal. 

Opens a file on the specified logical unit according to 
the parameters specified by the keywords. 

PAUSE [disp] 

disp is a decimal digit string containing one to five digits, 
an alphanumeric literal, or an octal constant. 

Suspends program execution and prints the display, if 
one is specified. 

PRINT See WRITE, Formatted Sequential 
See WRITE, Listed-Directed 

PROGRAM nam 

nam is a symbolic name. 

Specifies a name for the main program. 
READ (u,f [,END=s] [,ERR=s] ) [list] 
READ f[,list] 
ACCEPT f[,list] 

u is an integer variable or constant. 

f is a FORMAT statement label or an array name. 

s is an executable statement label. 

list is an I/O list. 

(Formatted Sequential) Reads one or more logical 
records from unit u and assigns values to the elements 
in the list, converted according to format 
specification f. 

READ(u[,END=s] [,ERR=s]) [list] 

u is an integer variable or constant, 
s is an executable statement label, 
list is an I/O list. 
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(Unformatted Sequential) Reads one unformatted record 
from unit u, and assigns values to the elements in the 
list. 



READ(u'r [,ERR=s] ) [list] 

u is an integer variable or constant. 

r is an integer expression. 

s is an executable statement label. 

list is an I/O list. 

(Unformatted Direct Access) Reads record r from unit u, 
and assigns values to the elements in the list. 

READ (u,*[,END=s] [ ,ERR=s] )list 
READ *,list 
ACCEPT *,list 

u is an integer variable or constant. 

* denotes list-directed formatting. 

s is an executable statement label. 

list is an I/O list. 

(List-Directed) Reads one or more logical records from 

unit u and assigns values to the elements in the list, 

converted according to the data type of the list 
element. 



RETURN 



Returns control to the calling program from the current 
subprogram. 



REWIND u 
u 



is an integer variable or constant. 

Repositions logical unit u to the beginning of the 
currently opened file. 



STOP [disp] 
disp 



is a decimal digit string containing one to five digits, 
an alphanumeric literal, or an octal constant. 

Terminate program execution and print the display, if 
one is specified. 
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SUBROUTINE nam [ ( [p [ , p] . . . ] ) ] 

nam is a symbolic name, 
p is a symbolic name. 



Begins a SUBROUTINE subprogram, indicating the program 
name and any dummy argument names, p. 



TYPE See WRITE, Formatted Sequential 

See WRITE, List-Directed 



Type Declaration 

typ v[ ,v] . . . 

typ is a data type specifier. 

v is a variable name, array name, function or function 

entry name, or an array declarator. The name can 

optionally be followed by a data type length specifier 
(*n). 

The symbolic names, v, are assigned the specified data 
type in the program unit. 

typ is one of: 

DOUBLE PRECISION 

COMPLEX 

C0MPLEX*8 

REAL 

REAL*4 

REAL*8 

INTEGER 

INTEGER*2 

INTEGER*4 

BYTE 

LOGICAL 

L0GICAL*1 

LOGICAL*4 

VIRTUAL a(d) (,a(d) ] . . . 

a(d) is an array declarator that specifies storage space for a 
VIRTUAL array. 

WRITE (u,f [,ERR=s] ) [list] 
PRINT f[,list] 
TYPE f [,list] 

u is an integer variable or constant. 

f is a FORMAT statement label or an array name. 

s is an executable statement label. 

list is an I/O list. 
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(Formatted Sequential) Writes one or more logical 
records to unit u containing the values of the elements 
in the list, converted according to format 
specification f. 



WRITE (u[,ERR=s] ) [list] 

u is an integer variable or constant. 

s is an executable statement label. 

list is an I/O list. 

(Unformatted Sequential) Writes one unformatted record 
to unit u containing the values of the elements in the 
list. 

WRITE (u'r [,ERR=s] ) [list] 

u is an integer variable or constant. 

r is an integer expression. 

s is an executable statement label. 

list is an I/O list. 

(Unformatted Direct Access) Writes record r to unit u 
containing the values of the elements in the list. 

WRITE ( u, *[, ERR=s] ) list 
PRINT * r list 
TYPE *,list 

u is an integer variable or constant. 

* denotes list-directed formatting. 

s is an executable statement label. 

list is an I/O list. 

(List-Directed) Writes one or more logical records to 
unit u containing the values of the elements in the 
list, converted according to the data type of the list 
element. 



B.3 FORTRAN LIBRARY FUNCTIONS 



FORM 



ARGUMENT 
TYPE 



RESULT 
TYPE 



DEFINITION 



ABS(X) 

IABS(I) 

DABS(X) 



Real Real Real absolute value 
Integer Integer Integer absolute value 
Double Double Double precision absolute 

value 
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ARGUMENT 


RESULT 




FORM 


TYPE 


TYPE 


DEFINITION 


CABS ( Z ) 






Complex to Real, absolute 
value 

where z=(x,y) 




Complex 


Real 


CABS(Z) = (x 2 +y 2 ) Vz 


FLOAT (I) 


Integer 


Real 


Integer to Real conversion 


IFIX(X) 






Real to Integer conversion 




Real 


Integer 


IFIX(X) is equivalent to 
INT(X) 


SNGL(X) 


Double 


Real 


Double to Real conversion 


DBLE(X) 


Real 


Double 


Real to Double conversion j 


REAL ( Z ) 






Complex to Real conversion, 




Complex 


Real 


obtain real part 


AIMAG(Z) 






Complex to Real conversion, , 




Complex 


Real 


obtain imaginary part j 


CMPLX(X,Y) 






Real to Complex conversion 




Real 


Complex 


CMPLX(X,Y)=X+i*Y l 




Truncation 


functions retu 


rn the sign of j 




the argumen 


t * largest in 


teger <. | arg| \ 


AINT(X) 


Real 


Real 


Real to Real truncation 


INT(X) 


Real 


Integer 


Real to Integer truncation 


IDINT(X) 


Double 


Integer 


Double to Integer truncation 




Remainder f 


unctions return the remainder 




when the 


first argument is divided by 




the second. 






AMOD(X,Y) 


Real 


Real 


Real remainder 


MOD(I,J) 


Integer 


Integer 


Integer remainder 


DMOD(X,Y) 


Double 


Double 


Double precision remainder 




Maximum va 


lue functions 


return the 




largest va 


lue from among the argument 




list; > 2 


arguments. 




AMAX0(I,J. . .) 


Integer 


Real 


Real maximum from Integer 
list 


AMAX1(X,Y,. . .) 


Real 


Real 


Real maximum from Real list 


MAX0(1,J,...) 


Integer 


Integer 


Integer maximum from Integer 
list 


MAXl(X,Y,. . .) 


Real 


Integer 


Integer maximum from Real 
list 


DMAX1(X,Y, . . .) 


Double 


Double 


Double maximum from Double 
list 




Minimum va 


lue functions 


return the 




smallest value from among the argument 




list? > 2 


arguments. 




AMINO (I, J,. . .) 


Integer 


Real 


Real minimum of Integer list ' 


AMIN1(X,Y,. . .) 


Real 


Real 


Real minimum of Real list 


MIN0(I,J, . . .) 


Integer 


Integer 


Integer minimum of Integer 
list 


MIN1(X,Y, . . .) 


Real 


Integer 


Integer minimum of Real list 


DMIN1(X,Y. . .) 


Double 


Double 


Double minimum of Double list 
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ARGUMENT 


RESULT 




FORM 


TYPE 


TYPE 


DEFINITION 




The transfer of sign functions return 




(sign of 


the second 


argument) * 




(absolute value of first 


argument) . 


SIGN(X,Y) 


Real 


Real 


Real transfer of sign 


ISIGN(I,J) 


Integer 


Integer 


Integer transfer of sign 


DSIGN(X,Y) 


Double 


Double 


Double precision transfer of 
sign 




Positive dij 


Eference functions return the 




first argument minus the 


minimum of the 




two arguments. 




DIM(X,Y) 


Real 


Real 


Real positive difference 


IDIM(I,J) 


Integer 


Integer 


Integer positive difference 




Exponential 


functions return the value 




of e raised 


to the argument power. 


EXP(X) 


Real 


Real 


e~x 


DEXP(X) 


Double 


Double 


e x 


CEXP(Z) 


Complex 


Complex 


e z 


ALOG(X) 


Real 


Real 


Returns log (e) (X) 


ALOGIO(X) 


Real 


Real 


Returns loglO(X) 


DLOG(X) 


Double 


Double 


Returns log (e) (X) 


DLOGIO(X) 


Double 


Double 


Returns loglO(X) 


CLOG ( Z ) 


Complex 


Complex 


Returns log(e) of complex 
argument 


SQRT(X) 


Real 


Real 


Square root of Real argument 


DSQRT(X) 


Double 


Double 


Square root of Double 
precision argument 


CSQRT(Z) 


Complex 


Complex 


Square root of Complex 
argument 


SIN(X) 


Real 


Real 


Real sine 


DSIN(X) 


Double 


Double 


Double precision sine 


CSIN(Z) 


Complex 


Complex 


Complex sine 


COS(X) 


Real 


Real 


Real cosine 


DCOS(X) 


Double 


Double 


Double precision cosine 


CCOS(Z) 


Complex 


Complex 


Complex cosine 


TANH(X) 


Real 


Real 


Hyperbolic tangent 


ATAN(X) 


Real 


Real 


Real arc tangent 


DATAN(X) 


Double 


Double 


Double precision arc tangent 


ATAN2(X,Y) 


Real 


Real 


Real arc tangent of (X/Y) 


DATAN2(X,Y) 


Double 


Double 


Double precision arc tangent 
of (X/Y) 


CON JG ( Z ) 






Complex conjugate, if Z=X+i*Y 




Complex 


Complex 


CONJG(Z)=X-i*Y 
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PORTRAN/RT-11 LANGUAGE SUMMARY 



ARGUMENT RESULT 
FORM TYPE TYPE DEFINITION 



RAN (I, J) Integer Real Returns a random number of 

uniform distribution over the 
range to 1 . I and J must 
be integer variables and 
should be set initially to 0. 
Resetting I and J to 
regenerates the random number 
sequence. Alternate starting 
values for I and J will 
generate different random 
number sequences. 
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APPENDIX C 
CAMERA ORIENTATION 



Two entries in the Patient Study Plan (see Chapter 4) call for switch 
settings on the scintillation camera. These entries refer to the 
orientation and rotation switches on cameras manufactured by Searle 
Radiographics, Inc. (formerly Nuclear-Chicago) . 

On the Searle cameras, the 4-position Orientation switch and the 
2-position Rotation switch combine to produce the eight possible 
coordinate relations according to the following table, in which X and 
Y represent the camera's field coordinates, and X' and Y 1 represent 
the coordinates of the matrix displayed on the screen. 



Orientation 
Switch Pos. 


Rotation Switch Position 


1 (HORIZONTAL) 


2 (UPRIGHT) 


1 
2 
3 
4 


X'=-Y 

Y'-X 

X'=-Y 
Y'=-X 

X'=Y 
Y'=-X 

X'=Y 
Y*=X 


X'=X 
Y'=-Y 

X'=X 

Y'=Y 

X'=-X 
Y'=Y 

X'=-X 
Y'=-Y 



The camera's coordinates are oriented as shown below, with the viewer 
standing above the camera, and the camera rotated 180 so that it is 
face upwards toward the viewer. 



C.l TRANSFORMATION OPERATORS 

The transformations tabulated above can be written in terms of 
operators, thus 

Z' = R Z 



matrix 
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CAMERA ORIENTATION 

where Z' - (X',Y') is the display coordinate operator 
Z « (X,Y) is the camera coordinate operator 
(R ) [m=l or 2] is the Rotation Switch Setting 
(0 ) [n=l,2,3, or 4] is the Orientation Switch Setting 

The matrix operators for each value of m and n are as follows: 



(0 ) * 



(R ) = 



1 
-1 

-1 
-1 



(0 ) m 



(R ) = 



1 

1 

1 
1 



(0 ) = 



•1 
1 



(0 ) = 



-1 
-1 



Note that the operator (0 ) is cyclically permutable, so that an 
absolute definition of the camera's coordinate system is not 
necessary. 

Example: 

For n=4, m=l 



Z' = 



X' 

Y' 



= 



R Z = 



1 







-1 




X 





-1 




-1 




Y 



-1 
-1 




-Y 
-X 




Y 
X 
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CAMERA ORIENTATION 



C.2 CONVERSION TO OTHER CAMERAS 

The two switches of the Searle cameras produce any of the eight 
possible coordinate orientations. Corresponding functions of other 
camera types can be matched to the settings of these two switches. 
For example, given a camera that can only rotate the image clockwise, 
the corresponding switch settings would be as follows: 





Camera X 




Searle 
Switch Settings 




1 

> 


I 

\ 


Rotation 
Switch 


Orientation 
Switch 






1 ► x 


2 

Upright 


2 








—m~ Y 


1 
Horizontal 


3 




1 


' 










X 








x "■* 


1 


' 




2 
Upright 


4 




Y 










> 

1 






1 


1 
Horizontal 


y 4 
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APPENDIX D 
USING A NEW DISK 

Before using a new RK05 disk cartridge, you must: 

1. Format the cartridge. 

2. Initialize the directory (required for RT-11) . 

Before using a new RK06, RK07, or RL01 disk, you need only initialize 
the directory. 

D.l FORMATTING A NEW RK05 DISK ON AN 11/34 

The following instructions detail the procedure for formatting an RK05 
disk, 

1. Mount the disk to be formatted in Unit 0. The following 
formatting procedure will work only on Unit 0. 

2. Begin the boot procedure. Press CNTRL/HALT , then CNTRL/BOOT. 
The four numbers will appear on the console followed by a 
dollar sign ($) . 

3. At the $, type: 

L SP 1000(j»D 

where ( ») represents a space and represents RETURN. 

The L stands for Load address. 

4. At the next $ prompt type: 

DQD 12737GED 

DCED 60Q3GID 

DfT) 177404GED 

DCED 105737QiD 

POO 177404GED 

DdD 100375GED 

DOT) 137GID 

D Cm 1000(H) 

Each line will be preceded by the $ prompt. The D stands for 
Deposit (at the address). 

5. To check that you have entered the correct numbers, type: 

hCED 1000GHD 
E 
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USING A NEW DISK 

After you type E (j*Dr tne system will type the input number 
that is deposited at location 1000. 

E QT) 001000 012737 

If 012737 does not appear for location 1000, correct the 
location by typing the following at the $ prompt; 

D CZ) 12737CHD 

Proceed to check each location and number in sequence by 
typing the following for each number you entered in step 4. 

The locations and numbers should appear. 

6. After you have verified that you typed in the numbers 
correctly^ type: 

L CED ioooGED 
sGED 

Wait 60 seconds while the disk is formatted. When the disk 
light stops flashing, the disk is formatted and ready for 
use. 



D.2 INITIALIZING AN RK05 RT-11 DISK DIRECTORY 

Initializing a disk sets up and completely clears its file directory. 
A new (unused) disk must always be initialized before it is first 
used. The effect of an INITIALIZE operation is to remove all 
filenames from the directory. Thus, before you initialize any disk, 
be sure that there are no files on it that you might later want. 

After formatting an RK05 disk, reload the GAMMA-11 system disk in Unit 
0, write protected and load the RK0'5 disk to be initialized in Unit 1. 
Type: 

CRTL/C 

INIT QD RKlifwT) 

The system will respond with: 

RK1:/Init are you sure? 

The, system prompt RKl:/Init are you sure? is always printed to provide 
an opportunity for you to verify the command. Typing a Y followed by 
RETURN initiates the operation, while N followed by RETURN ignores the 
operation and returns control to the monitor command mode. Check your 
command line, make sure you are initializing the correct disk, and 
then type a Y followed by RETURN. 
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USING A NEW DISK 

D.3 INITIALIZING AN RK06 RT-11 DISK DIRECTORY 

As with RK05 disks, initializing an RK06 disk sets up and completely 
clears its file directory. A new (unused) disk must always be 
initialized before it is first used. The effect of an INITIALIZE 
operation is to remove all filenames from the directory. Thus, before 
you initialize any disk, be sure that there are no files on it that 
you might later want. 

To initialize an RK06 disk, load the GAMMA-11 system disk, write 
protected and type: 

CTRL/C 

INIT/BAD CIO DMlrQTT) 

The system will respond with: 

DM1:/Init are you sure? 

The system prompt DMl:/Init are you sure? is always printed to provide 
an opportunity for you to verify the command. Typing a Y followed by 
RETURN initiates the operation, while N followed by RETURN ignores the 
operation and returns control to the monitor command mode. Check your 
command line, make sure you are initializing the correct disk, and 
then type a Y followed by RETURN. 

The /BAD option on the INIT command makes sure that any bad blocks on 
the disk are designated in the directory as FILE. BAD. In this way, 
the bad blocks are removed from the available disk blocks, thus 
minimizing disk errors. 
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INDEX 



Administrative data block, 

2-2 to 2-4, 2-7 
Assembling GAMMA-11, 4-1 



Backing up disks, 1-8, 1-9 
BACKUP, 1-8, 1-9 
BASIC commands, 

APPEND, A-8 

CLEAR, A-8 

COMPILE, A-8 

DEL, A-8 

LENGTH, A-8 

LIST, A-8 

NEW, A-8 

OLD, A-8 

RENAME, A-8 

REPLACE, A-8 

RESEQ, A-8 

RUN, A-9 

SAVE, A-9 

SCR, A-9 

SUB, A-9 

UNSAVE, A-9 
BASIC error messages, 
3-11 to 3-14, 
A-10 to A-18 
BASIC functions, 

ABORT, A- 7 

ABS, A-5 

ASC, A-6 

ATN, A-5 

BIN, A-6 

CHR$, A-6 

CLK$, A-6 

COS, A-5 

CTRLC, A-7 

CTRLO, A-7 

DAT$, A-6 

EXP, A-5 

INT, A-5 

LEN, A-6 

LOG, A-5 

LOG10, A-5 

OCT, A-6 

PI, A-5 

POS, A-6 

RCTRLC, A-7 

RND, A-5 

SEG$, A-7 

SGN, A-5 

SIN, A-5 

SQR, A-6 

STR$, A-7 



BASIC functions (Cont.) 

SYS, A-7 

TAB, A-6 

TRM$, A-7 

TTYSET, A-7 

VAL, A-7 
BASIC statements, 

CALL, A-l 

CHAIN, A-l 

CLOSE, A-l 

COMMON, A-l 

DATA, A-l 

DEF, A-2 

DIM, A-2 

END, A-2 

FOR, A-2 

GO TO, A-2 

GOSUB, A-2 

IF, A-2 

IF TO, A-2 

INPUT, A-3 

KILL, A-3 

LET, A-3 

LINPUT, A-3 

NAME, A-3 

NEXT, A-3 

ON, A-3 

OPEN, A-3 

OVERLAY, A-4 

PRINT, A-4 

RANDOMIZE, A-4 

READ, A-4 

REM, A-4 

RESET, A-4 

RESTORE, A-4 

RETURN, A-4 

STOP, A-4 
BASIC support routines 
BGAMMA routines, 3-21 
Building GAMMA-11, 1-1 



, 3-1 



Camera switch settings, C-l 
Comment block, 2-2 to 2-4, 

2-6 
COMPRS, 2-7 

Configuring disks, 1-4 
CTRL/C, A-9 
CTRL/O, A-9 
CTRL/Q, A-9 
CTRL/S, A-9 
CTRL/U, A-10 
Curve, 

dynamic, 2-17 
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DELETE, A-10 

Disk formatting, D-l 

Disks, 

backing up, 1-8, 1-9 
configuring, 1-4 
initializing, D-2, D-3 
RK05, 1-1, 1-2, D-l, D-2 
RK06, 1-1, 1-2, D-3 
RK07, 1-1, 1-2 
RL01, 1-1, 1-2 

Distribution media, 1-1, 
1-2 

DL, 1-2 

DM, 1-2 

Dynamic curve, 2-17 

Dynamic study, 2-2, 2-17 



Error messages, 

BASIC, 3-11 to 3-14, 

A-10 to A-18 
FORTRAN, 3-11 to 3-14 



FADOFF, 2-7 
FGADM1 routines, 3-20 
FGADM2 routines, 3-21 
FGCDMl routines, 3-21 
FGCOM2 routines, 3-21 
FGPICK routines, 3-7, 3-21 
FGPLOT routines, 3-21 
FGPTOV routines, 3-21 
File, 

dynamic patient, 2-2 

patient, 2-1, 2-10, 3-2 
File names, 

patient, 2-10 
File type, 2-1 
Files, 

internal , 2-17 

macro, 2-18 

playback, 2-18 
Formatting , 

disk, D-l 
FORTRAN arithmetic 
operators, B-l 
FORTRAN error messages, 

3-11 to 3-14 
FORTRAN library functions, 

ABS, B-ll 

AIMAG, B-l 2 

AINT, B-12 

ALOG, B-13 

ALOGID, B-13 

AMAXO, B-12 



FORTRAN library functions 
(Cont.) 

AMAX1, B-12 

AMINO, B-12 

AMIN1, B-12 

AMOD, B-12 

ATAN, B-13 

ATAN2, B-13 

CABS, B-12 

CCOS, B-13 

CEXP, B-13 

CLOG, B-13 

CMPLX, B-12 

CONJG, B-13 

COS, B-13 

CSIN, B-13 

CSQRT, B-13 

DABS, B-ll 

DATAN, B-13 

DATAN2, B-13 

DBLE, B-12 

DCOS, B-13 

DEXP, B-13 

DIM, B-13 

DLOG, B-13 

DLOG10, B-13 

DMAX1, B-12 

DMIN1, B-12 

DMOD, B-12 

DSIGN, B-13 

DSIN, B-13 

DSQRT, B-13 

EXP, B-13 

FLOAT, B-12 

FORM, B-12, B-13 

IABS, B-ll 

IDIM, B-13 

IDINT, B-12 

IFIX, B-12 

INT, B-12 

ISIGN, B-13 

MAXO, B-12 

MAX1, B-12 

MINO, B-12 

MINI, B-12 

MOD, B-12 

RAN, B-14 

REAL, B-12 

SIGN, B-13 

SIN, B-13 

SNGL, B-12 

SQRT, B-13 

TANH, B-13 
FORTRAN logical operators, 

B-l 
FORTRAN relational 
operators, B-l 
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FORTRAN statements, 

ACCEPT, B-2, B-8, B-9 

ASSIGN, B-2 

assignment, B-2 

BACKSPACE, B-2 

BLOCK DATA, B-3 

CALL, B-3 

CLOSE, B-3 

COMMON, B-3 

CONTINUE, B-3 

DATA, B-3 

DECODE, B-4 

DEFINE FILE, B-4 

DIMENSION, B-4 

DO, B-4 

ENCODE, B-5 

END, B-5 

END FILE, B-5 

END=, B-5 

EQUIVALENCE, B-5 

ERR=, B-5 

EXTERNAL, B-5 

FIND, B-6 

FORMAT, B-6 

FUNCTION, B-6 

GO TO, B-6 

IF, B-7 

IMPLICIT, B-7 

OPEN, B-7 

PAUSE, B-8 

PRINT, B-8, B-10, B-ll 

PROGRAM, B-8 

READ, B-8, B-9 

RETURN, B-9 

REWIND, B-9 

STOP, B-9 

SUBROUTINE, B-10 

TYPE, B-10, B-ll 

VIRTUAL, B-10 

WRITE, B-10, B-ll 
FORTRAN support routines, 
3-1, 3-10 

supplemental, 3-19 
Functions . 



suppleme.., — 
Functions, 
I BYTE,' 3-20 
ISPR 



IBYTE, ->-*v 
ISPR, 3-20 
LBYTE, 3-20 
rhpt. "*-?n 



RDPI, 

RDPR 

RSPI 



3-20 
3-20 
3-20 



GAM routines, 3-10 
GASP routines, 3-7 
GCHR routines, 3-10 
GCVG routines, 3-6 
GCVP routines, 3-6 



GDIS 


routines, 


3- 


■6 


GMXG 


routines, 


3- 


■6 


GMXP 


routines 


3- 


-6 


GPAR 


routines 


, 3- 


-3 


GPAW 


routines 


F 3- 


-3 


GPDR 


routines 


, 3- 


-3 


GPDW 


routines 


r 3- 


-3 


GPF routines, 


3-3 


GPFR 


routines, 


3- 


-3 


GPFW 


routines, 


3- 


-3 


GPKX 


routines, 


3- 


-7 


GPKY 


routines, 


3- 


■7 


GPLR 


routines, 


,3- 


■3 


GPLW 


routines, 


3- 


-4 


GPMR 


routines, 


3- 


■3 


GPMW 


routines, 


3- 


-3 


GPOV 


routines, 


3- 


-7 


GSAG 


routines, 


3- 


-7 


GSAR 


routines 


r 3- 


-6 


GSAW 


routines 


3- 


-7 


GSVG 


routines 


3- 


-6 


GSVP 


routines 


, 3- 


-6 



IBYTE functions, 3-20 
IFGFRM routines, 3-21 
IGLSTR routines, 3-21 
IGLSTW routines, 3-21 
Indirect command files, 4-1, 

4-5 
Initializing disks, D-2, 

D-3 
Internal files, 2-17 
ISPR functions, 3-20 



LBYTE functions, 3-20 
Linking FORTRAN routines, 

3-11 
Linking GAMMA-11, 4-1, 4-5 
List mode study, 2-6 



Macro files, 2-18 
Magnetic tape, 1-1, 1-3 
Matrix data, 2-2, 2-15 
MDOFF, 2-7 
Messages, 

BASIC error, 3-14 
FORTRAN error, 3-14 
Multiple static study, 2-4 



NADOFF, 2-7 
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PADOFF, 2-7 

Patient file, 2-1, 2-10, 
3-2 
dynamic, 2-2 
Patient file names, 2-10 
Playback files, 2-18 



RDPI functions, 3-20 
RDPR functions, 3-20 
Region of interest, 2-15, 

2-16 
RK, 1-2 
RK05 disks, 1-1, 1-2, D-l, 

D-2 
RK06 disks, 1-1, 1-2, D-3 
RK07 disks, 1-1, 1-2 
RL01 disks, 1-1, 1-2 
Routines, 

BASIC support, 3-1 

BGAMMA, 3-21 

FGADM1, 3-20 
3-21 



3-7, 3-21 



FGADM2 , 

FGCDM1, 3-21 

FGCOM2, 3-21 

FGPICK, 

FGPLOT, 3-21 

FGPTOV, 3-21 

FORTRAN support, 3-1, 

3-10 
GAM, 3-10 
GASP, 3-7 
GCHR, 3-10 
GCVG, 3-6 
GCVP, 3-6 
GDIS, 3-6 
GMXG, 3-6 
GMXP, 3-6 
GPAR, 3-3 
GPAW, 3-3 
GPDR, 3-3 
GPDW, 3-3 



Routines (Cont.) 

GPF, 3-3 

GPFR, 3-3 

GPFW, 3-3 

GPKX, 3-7 

GPKY, 3-7 

GPLR, 3-3 

GPLW, 3-4 

GPMR, 3-3 

GPMW, 3-3 

GPOV, 3-7 

GSAG, 3-7 

GSAR, 3-6 

GSAW, 3-7 

GSVG, 3-6 

GSVP, 3-6 

IFGFRM, 3-21 

IGLSTR, 3-21 

IGLSTW, 3-21 

supplemental FORTRAN 
support, 3-19 
RSPI functions, 3-20 



Save area, 2-11, 2-15, 2-17, 

3-6 
Save area descriptor block, 

2-11, 3-6 
Single static study, 2-3 
Study, 

dynamic, 2-2, 2-17 

list mode, 2-6 

multiple static, 2-4 

single static, 2-3 
Supplemental FORTRAN 

support routines, 3-19 
Switch settings, 

camera, C-l 
SYSGEN, 1-1, 1-4 



Z-count area, 2-3, 2-2, 2-6 
ZCTOFF, 2-7 
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